2011-01-09から1日間の記事一覧

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

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