[関数の使い方･書式]

○ ＝ readline ☆

☆：	(スカラー)	型グロブ付きのファイルハンドル(を返す式)。 　･･･　オブジェクトや文字列は不可。
○：	(スカラー)	読みこんだ行(最初の１行)。
	(リスト)	ファイルの終わりまでの各行のリスト。

---

[関数の機能]

型グロブの付いたファイルハンドル☆から読み込みを行ないます。 リストコンテキストではファイルの終わりまでを読み込み、スカラーコンテキストでは１行だけ読み込みます。 スカラーコンテキストでは、入力レコード区切り文字 $\ の内容を調整することで、読み込む範囲(行)の制御を行なうことが出来ます。

---

[書式の例]

$line = readline(*STDIN);

$line = <STDIN>; と等価

● 引数の有無･内容で読みこむファイルを切り替える

open FH1, "hoge1" or die "open FH1 失敗: $!";
open FH2, "hoge1" or die "open FH2 失敗: $!";
@FD = (*FD1, *FD2);
$ok = shift;
$line = readline( $ok ? $FH[0] : $FH[1]);
print $line;
close FH1;
close FH2;