Help for this page

Select Code to Download

Select or download this

my $sql = ",,,,";
print "<$sql>\n";               # <,,,,>
$sql =~ s/(?<=,)(?=,)/NULL/g;
print "<$sql>\n";               # <,NULL,NULL,NULL,>