use Tie::Array; use parent qw(Tie::StdArray); #### use parent qw(Tie::StdArray); #### use vars qw(@ISA); @ISA = qw (Tie::StdArray); ## no critic (ProhibitExplicitISA)