if ( substr($string, 0, 1) eq 'n' ) = { ... }