お勉強 / Perl Memo

お勉強

関数

• get("URL");：与えられたURLに対応するドキュメントをとってきて、配列を返す。
• getstore("URL","ファイル");：URLに対応するドキュメントを得て、ファイルに保存する。
• s/検索する文字列/置換後の文字列/;

  $str =~ s/dog/cat/;

• shift：指定した配列の先頭の要素を取り出して、その値を変数に格納する。取り出した要素は元の配列から削除され、要素は1つずつ前にずれる。

文字コード変換

1. jcode.plを使う場合
   1. jcode.plをソースファイルと同じディレクトリに置く
   2. ソースの最初のほうに以下を記述
      

      require "jcode.pl";

   3. eucをshift-jisに変換する場合は

      jcode::convert(\$str, "sjis", "euc");

パターンマッチ

$result = "Let's study Perl!" =~ /Perl/;

はマッチしたら$resultに1が、マッチしなかったらundefが入る。

$result = "Let's study Perl!" !~ /Perl/;

はマッチしなかったら$resultに1が、マッチしたらundefが入る。

パターンマッチの結果を表す特殊変数

特殊文字	意味
$&	マッチした文字列全体
$`	マッチした部分より前にある文字列
$'	マッチした部分より後ろにある文字列
2,...	1番目、2番目･･･のグループにマッチした文字列
$+	最後のグループにマッチした文字列

$r = "I love cat and dog." =~ /love (.+) and (.+)./;
print $1 . "\n";
print $2 . "\n";
print $& . "\n";

の実行結果は

cat
dog
love cat and dog.

正規表現

メタ文字

文字クラスの特殊文字

演算子