in reply to Problem using a variable for Regular expression test pattern

if ( index( $string, $testPhrase ) >= 0 ) {
    print "\$testPhrase is present.\n";
    }

[download]

In Section Seekers of Perl Wisdom