Perlゼミ

__DATA__ - データセクション

__DATA__より下に書かれたものは、データセクションと呼ばれます。データセクションを利用すると入力ファイルの内容を、プログラムの中に記述することができます。


# プログラム

__DATA__
kimoto,39
tanaka,29

DATAファイルハンドル

データセクションに記述された内容は、DATAという特殊なファイルハンドルを使って読み込むことができます。


while (my $line = <DATA>) {
  print "$line";
}

__DATA__
kimoto,39
tanaka,29

while文を使って、データセクションに記述された内容を1行づつ、取得しています。

編集したいテキストデータを、データセクションにコピーアンドペーストして、DATAファイルハンドルで読み込んで編集すれば、作業が楽です。

__DATA__とDATAファイルハンドルのサンプル

__DATA__とDATAファイルハンドルのサンプルのサンプルです。

use strict;
use warnings;

# カンマをタブに変更
while (my $line = <DATA>) {
  chomp $line;
  my @items = split(/,/, $line);
  
  print join("\t", @items) . "\n";
}

__DATA__
kimoto,39
tanaka,29

Perlプログラミングちゃんねるのご紹介

Perlの書籍
  • 業務に役立つPerl

    ログ解析など日本語を含むテキスト処理の実践!
    この私、Perlゼミの作者が執筆しています。
    ご購入、口コミ歓迎。
  • Perlの書籍 »
自己紹介
木本裕紀

「今日も元気だ、Perlで元気。
ゆとりあるITエンジニアライフのために
Perl情報を前向きに発信中!」

Twitter
フォロー、いいね、リツート、コメント歓迎

Youtube

チャンネル登録、いいね、コメント歓迎

kimoto.yuki@gmail.com
応援メッセージ、質問、間違い報告歓迎

木本システム株式会社
ご紹介キャンペーン実施中です。契約金額の10%をご紹介料としてお支払い。

(例)30万円のシステム開発委託契約が、1年続いたら、36万円がもらえる!!!