Perlについての質問箱 30箱目at TECHPerlについての質問箱 30箱目 - 暇つぶし2ch■コピペモード□スレを通常表示□オプションモード□このｽﾚｯﾄﾞのURL■項目テキスト893:デフォルトの名無しさん 07/06/04 21:33:09 ﾊﾞﾛｽｗ 894:デフォルトの名無しさん 07/06/04 21:50:35 自演荒らしのImageMagick君ってこれと同一人物っぽいなｗ http://www.gac.jp/article/index.php?stats=question&category=12&id=20208&command=msg 2chなんかに来ずにここで教えてクン続けてればよかったのに 895:デフォルトの名無しさん 07/06/04 21:59:04 さすがにそこまでストーキングっぽいことしなくてもいいのに・・・ 896:デフォルトの名無しさん 07/06/04 22:45:50 >>894 どっちもImage-Magi'c'になっててﾜﾗﾀ 借りてる鯖はlolipopかな？ 897:デフォルトの名無しさん 07/06/04 23:15:20 質問します! open FH,"/hoge/hoge.txt" #hoge.txtを開く while (<FH>) { #FHファイルを行単位で読み込んでいく $Str = $_; #変数Strにデフォルトで入力やパターンマッチになる特殊変数を代入 if( $Str =~ /__\w+__/g ){ #①??? if( $Str =~ /__KEYWORD__/ ){ #②??? $Str =~ s/__KEYWORD__/KEY/; #__KEYWORD__をKEYに置換する } } print $str; } close FH; コメントの部分の①と②の説明がうまくできません。 ①は=~の部分がわからず、②は/と/で挟まなくて__KEYWORD__だけでも 同じ結果が返ってくるのではないかと思って悩んでいます。 よろしかった教えて頂けないでしょうか？ 次ページ最新レス表示レスジャンプ類似スレ一覧スレッドの検索話題のニュースおまかせリストオプションしおりを挟むスレッドに書込スレッドの一覧暇つぶし2ch