$pattern = "something"; if ($foo =~ /$pattern/o) { #stuff } #### if ($foo =~ /^dis_isa_pattern$/o) { # stuff }