#!/usr/bin/env perl

use perl5i::latest;
use Test::More;

my @numbers = ( 1 .. 10 );

is( @numbers->false( sub { $_ < 5 } ), 6 );
is( @numbers->false( sub { $_ > 9 } ), 9 );

done_testing();