use Test::More tests => 1; use Dyn; use Data::Dumper; my @arr = Dyn::get_list(); is scalar(grep { qr/^\d+$/ } @arr), scalar(@arr), 'All elements from get_list() should be integers' or diag Dumper(\@arr);