Help for this page

Select Code to Download


  1. or download this
    my $tstr = '?';
    my $tv = join (', ', @table);
    ...
    } else {
       warn("\@data is not the same size as \@table; tried to put ".scalar
    + @data." items into ".scalar @table." columns.");
    }
    
  2. or download this
    $sth->execute( undef,@data )