die unless ( $answer eq 'Y' or 'y' );

##</code><code>##

die unless ( $answer eq 'Y' or $answer eq 'y' );