Skip to content

HTTPS clone URL

Subversion checkout URL

You can clone with HTTPS or Subversion.

Download ZIP
Newer
Older
100644 13 lines (8 sloc) 0.204 kb
de990db @brunoV added test for foreach
brunoV authored
1 use Test::More qw(no_plan);
2 use strict;
3 use warnings;
4
5 use autobox::Core;
6
7 my @array = qw(1 2 3);
8
9 my @added;
10 @array->foreach( sub { push @added, $_[0] + 1 } );
11
12 is_deeply [ sort @added ], [ qw(2 3 4) ];
Something went wrong with that request. Please try again.