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