Perlコーディング初心者質問スレ Part 59

[0191 nobodyさん 2009/03/04(水) 23:53:35 ID:???]

my $str = 'hogehoge';
my $search = 'geh';
if($str =~ /$search/){
print "NO\n";
}else{
....
}