my @j;
for (0..4) {
 push @j,$mw->Entry()->pack();
}

sub f {
 print $_->get for @_;
}
&f(@j);