use Tie::Array; use parent qw(Tie::StdArray);