Help for this page

Select Code to Download


  1. or download this
         my $tstr = join(',', ('?') x @table);
         my $tv   = join(',', @table);
    
  2. or download this
          $sth->execute( @data) || die("Error: Can't execute: $DBI::errstr
    +");
    
  3. or download this
       die "Hey, \@data should have " . 
            scalar(@table) . 
            " values but it only has " . scalar(@data) . "!"
         if @data != @table;