OKWAVEのAI「あい」が美容・健康の悩みに最適な回答をご提案!
-PR-
解決
済み

検索してあった数を調べる 初心者です。

  • すぐに回答を!
  • 質問No.247259
  • 閲覧数64
  • ありがとう数1
  • 気になる数0
  • 回答数1
  • コメント数0

お礼率 28% (43/151)

perlを使ってabc.txtの中に 1999 という文字列が何個あるか調べるプログラムはどのように書けばよろしのでしょうか?@を使ったりしてやってみたのですが、これでは 1999 が含まれる行の数しか出し方がわかりませんでした。

ご教授ください。お願い致します。
通報する
  • 回答数1
  • 気になる
    質問をブックマークします。
    マイページでまとめて確認できます。

質問者が選んだベストアンサー

  • 回答No.1
レベル9

ベストアンサー率 33% (33/98)

ええと、1999 が含まれる行の数がわかったということは、行ごとに処理する方法はわかっておられるわけです。
ということで。「行(つまり、文字列)に1999が含まれる数を求める方法」がわからないということですね

一番簡単なのは正規表現とのマッチングです。
この場合、1999はそのままでいいので

$count++ while($str =~ m/1999/g);
とか
$count = ($str =~ s/1999/1999/g);

でできます。高速にやりたければindex関数を検討してください

open ('hoge', TEXT) or die "can't open hoge\n";

my $count = 0;
while(<TEXT>) {
$count++ while(m/1999/g);
}

close(TEXT);

こんな感じでしょうか?
ではでは~
お礼コメント
Mohican

お礼率 28% (43/151)

大変遅くなりもうしわけありませんでした。
投稿日時 - 2002-07-05 23:52:47
-PR-
-PR-
このQ&Aのテーマ
このQ&Aで解決しましたか?
関連するQ&A
-PR-
-PR-
こんな書き方もあるよ!この情報は知ってる?あなたの知識を教えて!
このQ&Aにはまだコメントがありません。
あなたの思ったこと、知っていることをここにコメントしてみましょう。

その他の関連するQ&A、テーマをキーワードで探す

キーワードでQ&A、テーマを検索する
-PR-
-PR-
-PR-

特集


いま みんなが気になるQ&A

関連するQ&A

-PR-

ピックアップ

-PR-
ページ先頭へ