if ( ( $val =~ /m/i ) && ( $clamp =~ /y/i ) ) {......}

##</code><code>##

if ( ( $val =~ m/m/i ) && ( $clamp =~ m/y/i ) ) {......}