use Perl6::Junction qw/any/; if ( any( @list ) >= 13 ) {    # ... }