From: Wallace Reis Date: Tue, 22 Jul 2014 18:10:51 +0000 (-0300) Subject: Fix warning due uninitialized var X-Git-Tag: v0.11019~26 X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=6c773785737f91fe347d77c11aa49f11569ba186;p=dbsrgits%2FSQL-Translator.git Fix warning due uninitialized var "Use of uninitialized value in concatenation" --- diff --git a/lib/SQL/Translator/Parser/DBI/MySQL.pm b/lib/SQL/Translator/Parser/DBI/MySQL.pm index 8bd8a06..3512fb7 100644 --- a/lib/SQL/Translator/Parser/DBI/MySQL.pm +++ b/lib/SQL/Translator/Parser/DBI/MySQL.pm @@ -37,7 +37,7 @@ sub parse { $dbh->{'FetchHashKeyName'} = 'NAME_lc'; - my $create; + my $create = q{}; for my $table_name ( @table_names ) { next if (grep /^$table_name$/, @skip_tables); my $sth = $dbh->prepare("show create table $table_name");