$matches = ($value =~ /$search/g);


##</code><code>##

@_=qw;
Just another Perl hacker,;
;$_=q=print
"@_"= and eval;