余り頻繁に使うモジュールでは無いのでメモっとく。 #/usr/bin/perl use strict; use warnings; use Data::Dump qw(dump); use Perl6::Say; use SQL::Translator; my $dbh = DBI->connect("dbi:mysql:world", "root", ""); my $table = $dbh->selectrow_arra…