sironekotoroの日記

Perl で楽をしたい

2014-01-01から1年間の記事一覧

Perl言語プログラミングレッスン[入門編] 第8章

結城先生は面白い問題作るよなぁ 以下のスクリプトで$&,$1,$2,$3に該当するのは? use strict; use warnings; my $str = 'The price is 300yen. The distance is 120km.'; if ( $str =~ /((\d+)([A-Za-z]+))/ ) { print $&, "\n"; print $1, "\n"; print $2,…