2 parents b289fc3 + bb8d9b5 commit 1d3b4e8Copy full SHA for 1d3b4e8
1 file changed
sqlserver2pgsql.pl
@@ -101,7 +101,7 @@ sub parse_conf_file
101
while (my $line = <CONF>)
102
{
103
$line =~ s/#.*//; # Remove comments
104
- $line =~ s/\s+=\s+//; # Remove whitespaces around the =
+ $line =~ s/\s+=\s+/=/; # Remove whitespaces around the =
105
$line =~ s/\s+$//; # Remove trailing whitespaces
106
next
107
if ($line =~ /^$/); # Empty line after comments have been removed
@@ -1853,7 +1853,7 @@ sub parse_dump
1853
}
1854
$constraint->{TYPE} = 'CHECK';
1855
$constxt =~
1856
- s/\[(\S+)\]/$1/g; # We remove the []. And hope this will parse
+ s/\[(\S+?)\]/$1/g; # We remove the []. And hope this will parse
1857
$constraint->{TEXT} = $constxt;
1858
push @{$objects->{SCHEMAS}->{$schema}->{'TABLES'}->{$table}->{CONSTRAINTS}},
1859
($constraint);
0 commit comments