package My::Array {
    use Tie::Array;
    use parent -norequire, qw(Tie::StdArray);
}