Perlコーディング初心者質問スレ Part 57

Perlコーディング初心者質問スレ Part 57 at PHP

597:590
08/05/28 10:39:10
うわ、ちょっと離れたスキにすげぇ慇懃無礼なこと書いてやがる。
目的も明確にせず、そのへんが限界てｗ
そもそも次の疑問に移ったなら、その過程を説明するのが回答者への最低限の礼儀だろ。
社会出て苦労するよ。

ちなみに>>591は、俺ならこう書く。

sub merge_argument_and_default {
　my ($argument, @default) = @_;
　my %count;
　$count{$_} = $default[$_] for( 0..$#default );
　$count{$_} = ${ $argument }[$_] for( 0..$#{ $argument } );
　return map { $count{$_} } sort keys %count;
}

次ページ

続きを表示

1を表示