number_guessing.pl

use v6;

my $hidden = (1..200).pick;
# say $hidden;

my $guess = prompt "Type in your guess: ";
# say $guess;

given $guess cmp $hidden {
   when Same {
      say "Hit!";
   }
   when Less {
      say "Your guess is too small";
   }
   when More {
      say "Your guess is too big";
   }

}