# Dyn.t

use Test::More qw ( no_plan );
use Dyn;

my @arr = Dyn::get_list();
if (@arr) {
	foreach my $elem (@arr) {
		like($elem, qr/^\d+$/, q{Expect an integer});
	}
}

__END__