Select Code to Download

#! /usr/bin/perl -w

...
        $dbh->do('insert into data (date,number) values(?,?)', {}, $da
+te,$cur);
    }
}

DATE,NUMBER
2005-05-16,2
2005-05-17,8

DATE,NUMBER
2005-05-16,2
2005-05-17,2005-05-17

$ perl -MDBD::CSV -e 'print "perl\t$]\n"; print $_,"\t",${$_."::VERSIO
+N"},$/ foreach @ARGV' DBD::CSV SQL::Statement SQL::Parser Text::CSV_X
+S SQL::Statement::Util
perl    5.008005
...
SQL::Parser     1.13
Text::CSV_XS    0.23
SQL::Statement::Util    -1, set by base.pm

perl    5.008006
DBD::CSV    0.21
...
SQL::Parser    1.09
Text::CSV_XS    0.23
SQL::Statement::Util