>>611
use Data::Dumper;
eval { die "hoge"; };
print Dumper($@);
eval { die ["hoge"]; };
print Dumper($@);