Perlについての質問箱 64箱目at TECHPerlについての質問箱 64箱目 - 暇つぶし2ch■コピペモード□スレを通常表示□オプションモード□このスレッドのURL■項目テキスト1000:デフォルトの名無しさん 21/03/09 23:03:58.63 B0uPByTP.net >>983 hoge,xxxx にはマッチしないが、ええんか? >>979の目的と違うで。 1001:デフォルトの名無しさん 21/03/10 02:28:31.13 ixLG+AYE.net hoge(,|$) やりたいのはコレじゃない? 1002:デフォルトの名無しさん 21/03/10 06:16:01.51 S+G6vYN6.net >>983 近いといえば近いが、そういう書き方をしたいなら「, で始まる文字列」じゃないか。 hoge(,.*)?$ あと、Perl には \z もあるよ。 1003:976 21/03/11 11:15:21.72 VAAe2gi6.net みなさん、こんなアホに付き合ってもらってありがとうございます。 疲れてたのかな、俺。 まだ試してませんが、教えていただいたやり方でチャレンジしてみます。 1004:532 21/03/11 11:39:56.33 AlcqB+X5.net $pat = 'hoge(?:,.*)?$'; print "1\n" if 'hoge,dsad' =~ $pat; print "2\n" if 'hoge' =~ $pat; print "3\n" if 'hage' =~ $pat; はどうよ 実行例 ~ $ perl 64_976_hoge_pat.pl 1 2 次ページ最新レス表示レスジャンプ類似スレ一覧スレッドの検索話題のニュースおまかせリストオプションしおりを挟むスレッドに書込スレッドの一覧暇つぶし2ch