Select Code to Download

  DB<194> @a=1..5
 => (1, 2, 3, 4, 5)
...

  DB<198> any {$_ eq 3 } @a
 => undef

  DB<210> sub any (&\@) { &List::Util::first } 

...

  DB<217>  any {$_ eq 5 } @a
 => 5