$a = $b unless $a =~ /$b/;