Perlゼミ

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

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

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

my $c = getc $fh;

サンプル

以下は、getc関数とwhile文を使って、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の入門書
  • 初めてのPerl 第7版

    Perl入門 定番の一冊
  • 業務に役立つPerl

    ログ解析など日本語を含むテキスト処理の実践!
Twitter
Perlゼミの情報が役立ったら、フォロー、いいね、リツートで応援。