Help for this page

Select Code to Download

Select or download this

my @compile=param ('compile');
my $dbh=DBI->connect($dsn,$user,$password,) or die "Error $DBI:: error
+ connecting to $dsn";
...
print "<tr><td>$identifier</td></tr>";}}}
print "</table>";
$sth->finish;