Help for this page
#! /usr/bin/perl my $v1 = "*hello"; my $v2 = "*hello"; ... if ($v1 =~ /$v2/){ print "match\n"; }
$v2 =~ s/\*/\\\*/g;