Select Code to Download

use strict;
use warnings;
...
my $query    = "non-sense";

print $mystring =~/\b($query)\b/i ? "Matched" : "Missed";