if ($question eq 'yes' || $question eq 'y') ...

##</code><code>##

if ($question =~ /^y/i) ...