Perlによるファイル内データ抽出

2年 ago
海斗, 葵
1 minute

Perlでは、正規表現または組み込みの文字列関数を用いてファイル内のデータをフィルターすることができます。一般的な方法は次の2つです。

  1. 正規表現を使用してデータをフィルタリングします。
open(my $fh, '<', 'file.txt') or die "Cannot open file: $!";
while (my $line = <$fh>) {
if ($line =~ /pattern/) {
# 进行处理
print $line;
}
}
close($fh);
  1. 文字列関数を用いてデータをフィルタリングする
open(my $fh, '<', 'file.txt') or die "Cannot open file: $!";
while (my $line = <$fh>) {
if (index($line, 'substring') != -1) {
# 进行处理
print $line;
}
}
close($fh);

このコード例では、フィルターするファイル名が「file.txt」であることを想定しています。 open() 関数はファイルをオープンするため、 < は読み取り専用モードを表します。 while ループはファイルの各行を反復処理し、正規表現または文字列関数に基づいてフィルター条件を満たしているかどうかを判断します。条件を満たす行は処理されます（例：コンソールに出力）。最後に、 close() 関数を使用してファイルを閉じます。具体的なフィルター処理ロジックを実装するには、コード内の「pattern」または「substring」を必要に応じて変更してください。

bannerAds