if( $b and $a =~ /$b/ ) { do this }