Select Code to Download

sub continue_yn
  {
...

   print "Valid option entered";
  }

Readonly my %VALID_CHAR => ( y => 1, Y => 1, n => 1, N => 1 );
sub continue_yn
...

   print "Valid option entered";
  }