m ($var) = ""; ##

##

my ($var) = "";

##

##

m ($var) = "";

##

##

$_ =~ m/$var/ = "";

##

##

m ($var);

##

##

$_ =~ m/$var/;