2016-07-01から1日間の記事一覧

perl 文字列の置換2

#eオプションを使って、マッチした数値を計算に使う。2つの数値をスペースで区切って入力すると、それらの数値の積を表示数r。 #スペース文字で区切った2値の積を表示 print "2つの数値をスペースで区切って入力してください。>"; $string =<STDIN>; chomp($string)</stdin>…

perl 文字列の置換1

#簡単な置き換え $string = <

perl いろいろな正規表現1

#入力された英文を単語ごとに区切り、「単語:区切られた単語」のように表示するスクリプト $ward = <STDIN>; chomp($ward); print "単語:$&\n" while($ward =~ /\w+/g); #実行結果 #There's more than one way to do it # There's more than one way to do it # </stdin>…

perl 正規表現で簡単なマッチング3

#oオプション #oオプションをつけると、最初のマッチ時に展開した変数の値をそれ以後のマッチでも使い続ける。 #配列と初期マッチ文字列の定義 @array = ("Perl ABC", "ABCDEF", "Perl", "ABC"); $serch = "ABC"; #途中で$serchの値を変更する print "oなし…