DBIx::CSVDumper SQLの結果をそのままCSVで出力したいと思って作った。使い方はSynopsisまんまだけどこんな感じ。 use DBIx::CSVDumper; my $dbh = DBI->connect(...); my $dumper = DBIx::CSVDumper->new( encoding => 'cp932', # 出力エンコーディング(デフォルト: utf-8) ); my $sth = $dbh->prepare('SELECT * FROM item'); $sth->execute; # プレースホルダーなければ省略可能 $dumper->dump( sth => $sth, file => 'tmp/item.csv', #fh => $fh # ファイルハンドル渡したりも出来る ); 別にシェルでゴニョればできるしPerlでやる必要はなさそう