##
if ($_ =~ $what{3}) { ... }
##
##
if ($_ =~ //) { ... }
##
##
if (1) { ... }
##
##
my $what = "(fred|barney){3}";
...
if ($_ =~ $what) { ... }
##
##
if ($_ =~ /($what){3}/) { ... }
....
if ($_ =~ /$what/) { ... }
##
##
if (/($what){3}/) { ... }
...
if (/$what/) { ... }