Select Code to Download

my @records = ( ['value1', 'value2'], ...) ;

my $sth = $dbh->prepare("INSERT INTO $table (field1, field2) VALUES (?
+,?)");
foreach my $valuesref (@records) { $sth->execute(@$valuesref) }