Select Code to Download

sub AS_ARRAY {
    my $self=shift;
    # do something useful here
}

$obj->[42];  # would be the same as
$obj->AS_ARRAY(42);  # and so on...

@$m # entire matrix, your syntax: $m->()
$m->[ 1] # second row, your syntax $m->( 1);
$m->[ 1]->[ 0] # individual element, your syntax $m->( 1, 0);

package Matrix;
use strict; use warnings;
...
1;

__END__