my $ArrayList= use Perl::Util::ArrayList; my $a= $ArrayList->new();