Counter: 5071, today: 1, yesterday: 0

このページは、ターミナルからパールコンパイラを使って、簡単な処理をさせる事を目的に記述しました。



本ページでは半角の¥を入れると?等に文字化けしてしまうので¥は全角で記述しました。実際にターミナルに入力する場合は、コピーペースト後半角に修正する必要が有ります。


タブを半角スペース8ヶに置き換える。

  • in.txtは入力用ファイルで、タブの入っているファイルです。
  • out.txtはスペースに変換後出力されるファイルです。
  • タブは半角スペース8ケに置換しますが8の数字を変更することで置換スペースの数を修正できます。

perl -e 'while(<>){1 while s/¥t+/" " x (length($&)*8-length($`)%8)/e;print;}' < in.txt > out.txt

超簡単な電卓風

  • 加減乗除ができます。例えば250*(50+50)-1000などと計算式を入れるだけで計算ができます。
  • ターミナルから下記コマンドを入力してリターン後計算式を入れると計算式と答えが表示されます。

perl -e 'print eval(<>)."¥n"'

インストールしてあるパールモジュールを表示

ターミナルから下記のように入力します

find `perl -e 'print "@INC"'` -name '*.pm' -print

1から100までの数字をファイル出力する

ターミナルから下記のように入力するとout.txtに1から100迄の数字を出力することができます。

for($i=1;$i<101;$i++){print "$i¥n";}' > out.txt

改行コードをLFに変換するPerlのソースコード

  • ターミナルから perl tolf.pl と入力。
  • 次の行へ変換元ファイル名を入力する(cyomehoge)
  • 同じ階層にcyomehoge-lf.txtが出力されます。

添付ファイル: filetolf.pl.sit 1712件 [詳細]

トップ   差分 バックアップ リロード   一覧 単語検索 最終更新   ヘルプ   最終更新のRSS
Last-modified: 2006-06-06 (火) 11:22:43 (4152d)