Changes between Version 4 and Version 5 of SqLiteToMySql

Timestamp:

May 19, 2007, 9:20:58 PM (17 years ago)

Author:

david@…

Comment:

minor possible optimisation in perl code

SqLiteToMySql

@@ -19 +19 @@
 #!/usr/bin/env perl
 
-while (<>) {
-  $i = $i . $_;
-}
+$_ = join("", <>);
 
-$i =~ s/^CREATE.*?\);$//smgi;
+$_ =~ s/^CREATE.*?\);$//smgi;
 
-print $i;
+print $_;
 
 # NEOF