Select Code to Download

my $results;
my $test_data = [qw{foo bar baz}];
...
}
ok($results, '... and some_func succeeded');
is_deeply($results, $test_data, '... and it should return the correct 
+data');

my @rand = qw/
    0.78195951257749
    0.625570958105044
...

use ex::override rand => sub {unshift @rand => pop @rand; $rand[0]};
print rand, $/ for 1 .. 5;