Loose-Info.com
Last Update 2008/05/18
TOP - Perl - 特殊変数 - $/

入力処理をする際の行末を示す文字を指定します。デフォルトは改行文字です。

(例)
open TEST, "<test.txt"; $/ = ":"; # デリミタをコロンに設定して1行目を読み込み $line = <TEST>; print "$line\n"; $/ = "\n"; # デリミタを改行文字に設定して2行目読み込み $line = <TEST>; print "$line\n"; close TEST;

test.txt
test1:test2:test3:test4:test5

実行結果
test1: test2:test3:test4:test5