require YAML;
sub { YAML::Dump(@_) }
} elsif ($format eq 'JSON') {
require JSON;
sub { JSON->new->utf8->canonical->encode(@_) }
} else {
print "Unknown fo
www-mobilecarrierjp-dump_all.pl --format=JSON --datdir=/path/to/output --softbank
--format=JSON 出力フォーマットを指定する(JSON または YAML を選択可能)
--da