自分と同様にはまっている人がいるので、書いておくといつか誰かの役に立つかもしれないというエントリーです。 スクリプト #!/usr/bin/perl use strict; use warnings; my $data = <<END_OF_DATA; test1 test2 test3 END_OF_DATA ### ファイルハンドルopen open my $fh, '<', \$data; ### 現在のファイル位置を調べる warn tell $fh; ### read my @array1 = <$fh>; ### 読み取り開始位置が最後に移動している事を確認。 ( 文字数 + 改行…</end_of_data;>

このタイトルを一回書いてみたかった。社内には勉強会というものがあるんですが、この時間使って新人向けの資料でも作ろうかなと思いました。で、第一回はとりあえずperldocを紹介しようかと。Perlで分からない事がを調べる場合、こんな感じでしょ？ google…