2009-06-01から1ヶ月間の記事一覧
ハッシュと配列の参照が入り交じったような複雑なデータ構造の、全value を均等に加工したかったので次の様にしてみました。 use strict; use Perl6::Say; use Data::Dumper; sub cook_hash { my ( $rh, $rf_cook ) = @_; my %tmp; for ( keys %$rh ) { if (…
ハッシュと配列の参照が入り交じったような複雑なデータ構造の、全value を均等に加工したかったので次の様にしてみました。 use strict; use Perl6::Say; use Data::Dumper; sub cook_hash { my ( $rh, $rf_cook ) = @_; my %tmp; for ( keys %$rh ) { if (…