>perl
$v1 = "*hello";
$v2 = "*hello";
print quotemeta($v2),"\n";
print "match" if $v1 =~ /\Q$v2/;
__END__
\*hello
match
>