読者です 読者をやめる 読者になる 読者になる

perl 標準入力または引数に指定したファイルを表示する

#標準入力または引数に指定したファイルをそのまま表示する
#標準入力とファイルの双方を受け取るスクリプト
#which.pl

#標準入力、ファイルのどちらかを取得
while(<>){
    #内容を表示
    print;
}

#perl which.plのように引数を指定しないで実行すると、標準入力を受け取る
#待機状態になる。文字列を入力してenterキーを押すとその文字列がエコーバッ
#クされ待機状態に戻る。perl which.pl test.txtのようにwhich.plに引数を
#指定すると、引数をファイル名とみなしてオープンし、その内容を入力とし
#て受け取り、画面に出力する。

#実行結果
# $ perl which.pl 
# hello
# hello
# hello
# hello
# how
# how
# low
# low
# ^C


# $ perl which.pl copyFile.txt 
# これをこぴー

初めてのPerl 第6版

初めてのPerl 第6版