Select Code to Download

   my @alphabeth = 'a' .. 'z';

   my $letter = 'p';
   $letter++; # Now $letter is 'q'

   chomp(my $hladane = <STDIN>);