Help for this page

Select Code to Download

Select or download this

foreach my $key_expal (keys %expal) {
    $sth->execute($key_expal) || die $sth->errstr;
. . .