はらぺこ日誌» ブログアーカイブ » Perl の正規表現はリストコンテキストでキャプチャがないと (1) を返す
Perl で、 my @cap = $uri{$mkey} =~ /$ex_item->{match}{$mkey}{pattern}/ or next EX_MATCH_LOOP; @vars{@{$ex_item->{match}{$mkey}{vars}}} = @cap if exists $ex_item->{match}{$mkey}{vars} && ref $ex_item->{match}{$mkey}{vars} eq 'ARRAY'; なんてコードを書いていて (何をやろうとしている... > このページを見る
はてなブックマーク
