2014-01-01から1年間の記事一覧
結城先生は面白い問題作るよなぁ 以下のスクリプトで$&,$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,…
結城先生は面白い問題作るよなぁ 以下のスクリプトで$&,$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,…