Perl入門ゼミ

テキスト処理、Linuxサーバー管理、Web開発ならPerl
  1. Perl
  2. 標準関数
  3. here

getc関数 - ファイルから一文字ずつ読み込む

getc関数を使って1文字づつ読み込むこともできます。

my $c = getc $fh;

サンプル

以下は、1文字読み込みのサンプルです。

use strict;
use warnings;

# 1文字読み込み
# 読み込みたいファイル名
my $file = shift;

print "1: 1文字ずつ読み込む。\n";
open(my $fh, "<", $file)
  or die "Cannot open $file: $!";

# 1文字ずつ読み込むにはgetc関数を使います。
while (defined (my $c = getc $fh)) {
  print $c;
}

close $fh;
  • Perlとはテキスト処理の記述性とパフォーマンスに優れ、正規表現が言語に組み込まれているプログラミング言語です。
  • Linuxサーバーでのフィルタリングプログラム、複数行の文字列を処理、ファイル内容の検索・置換などが得意
  • Perlはgitopensslなど広く普及したUnix/Linuxミドルウェアの補助ツールとして採用実績あり。後方互換性とポータビリティの高さがひとつの理由と推測。
  • 大量のテキストを扱うWeb開発も得意。ロングテールSEOを意識したWebサイト、アドテクやソーシャルゲームでの50ms以内のJSONの生成など。