Help for this page
use strict; use warnings; ... if (-1 != index $str, $match) { print "..do something..\n"; }
use strict; use warnings; ... if ($str =~ $match) { print "..do something..\n"; }