>perl -wMstrict -le
"my $s = 'abc';
 ;;
 print 'match' if 'xabcx' =~ $s;
 print 'match' if 'xabcx' =~ 'abc';
"
match
match