Re: while loop question

[hbm]

Another possibility:

   my $match = 9;
   my @loop  = (0..5);
   for my $v (@loop,undef) {
      if (!defined $v) {
        say "not found";
      } elsif ($v == $match) {
        say "found";
        last;
      }
    }