TheBlackArtistのプロフィール

ファイルの中身が「abcＣＬＥてすと」という文章のファイルをopenして、 $text = "abcＣＬＥてすと"　 になるように代入し、そこから「abc」を削除して 「ＣLＥてすと」という文にしようと思い、 $text =~ s/a|b|c//g; print "結果：$text\n"; のようなプログラムをつくり、結果を表示すると 「結果：ｂkＥてすと」 と表示されてしまいます。 abcはうまく削除されているようですが、他の文字が変化してしまっているようです。 関係ない文字を変化させない為には、どうすればいいでしょうか？

ファイルの中身が「abcＣＬＥてすと」という文章のファイルをopenして、 $text = "abcＣＬＥてすと"　 になるように代入し、そこから「abc」を削除して 「ＣLＥてすと」という文にしようと思い、 $text =~ s/a|b|c//g; print "結果：$text\n"; のようなプログラムをつくり、結果を表示すると 「結果：ｂkＥてすと」 と表示されてしまいます。 abcはうまく削除されているようですが、他の文字が変化してしまっているようです。 関係ない文字を変化させない為には、どうすればいいでしょうか？

次のような入力ファイルがあったときに、EOFまでのデータを番号１+番号2別にファイルに出力したいのですが、どのようにするのがいいでしょうか？ できれば、入力したデータをハッシュか配列にいれてからデータを加工してファイルに出力したいと思っています。 入力ファイル 1.xxx 2.A EOF 1.xxx 2.B EOF 1.xxx 2.A EOF 1.www 2.B 出力ファイル ファイル1 1.xxx 2.A 1.xxx 2.A ファイル2 1.xxx 2.B ファイル3 1.www 2.B