Perl

メモっとこう、Perlでファイルを変数に一気読み

## $/(改行区切り)を無効にすることにより改行も含めて一括で変数dataに読み込める open (IN , "< input.txt"); local $/ = undef; my $data = <IN>; print "$data\n"; close(IN); 忘れるからね。いつも。</in>

実際にやってて非常に使うがいつもぼんやり忘れてしまう正規表現の知識についてメモっとく

忘れることはメモっとくのが一番。 正規表現における()括弧について メタ文字「|」縦棒(つまりor)の範囲を限定する 量指定子の対象をグループ化する 後方参照(マッチ部分をキャプチャし、後から正規表現内、またはプログラムでキャプチャ部分を使用する …

perlでHibernateのsqlログからテーブル名を抽出

前回の実際 とりあえず必要なものはなんとなく抜き出せてるみたいなんでこれでいいです。正規表現が冗長だとかいろいろありますが少しずつです。 AppleScriptかなんかからPerlを呼ぶようにしますかね。Windowsならバッチファイルかなんかにして、僕の場合はC…

perlメモ

#行頭の空白を削除する open (IN , "< in.ldif"); open (OUT , "> out.ldif"); while(<IN>){ s/^\s+//; print(OUT "$_"); } 仕事で、必要っぽかったので、perlがてら以下。汎用性なし! #ldifファイルにあったuserpasswordの値を、 #useridの値でリセットする。 </in>…

Perlの表面だけは、ほんの少しだけ分かったかも知れない

仕事でちょこっとさわったので、というか触らなくてはならなかったので、いい機会なんで、全体像の表面をさらっと習った。誰に習ったのかというとこちらと↓ 新版Perl言語プログラミングレッスン入門編作者: 結城浩出版社/メーカー: ソフトバンククリエイティ…