Return to lonmysql.pm CVS log | Up to [LON-CAPA] / loncom / interface |
version 1.40, 2016/08/14 16:13:22 | version 1.41, 2019/11/20 18:02:55 |
---|---|
Line 1259 Fixes a table name so that it will work | Line 1259 Fixes a table name so that it will work |
sub fix_table_name { | sub fix_table_name { |
my ($name) = @_; | my ($name) = @_; |
$name =~ s/^(\d+[eE]\d+)/_$1/; | $name =~ s/^(\d+[eE]\d+)/_$1/; |
$name =~ s/\W//g; | |
return $name; | return $name; |
} | } |