Select Code to Download

my $data = [
    { col1 => 'data1', col3 => 'data3' },
...

# Run the insert statement for each row in our list
my $sql_insert = qq(insert into "$table" ($columns) values ($placehold
+ers));

#!perl -w
use strict;
...
        warn $err->[1];
    };
};