2009-10-13から1日間の記事一覧
タイトルだけで伝え終わった感満載。そして多分常識。 use strict; use warnings; use Data::Dumper;sub p {warn Dumper shift;my @c = caller;print STDERR " at $c[1]:$c[2]\n\n"} my $str = 'foo_hoge'; p 'matched' if matched($str); my @list = qw/hog…
タイトルだけで伝え終わった感満載。そして多分常識。 use strict; use warnings; use Data::Dumper;sub p {warn Dumper shift;my @c = caller;print STDERR " at $c[1]:$c[2]\n\n"} my $str = 'foo_hoge'; p 'matched' if matched($str); my @list = qw/hog…