If an array ref was suitable you could always bless it, then it would be an array AND an object you could call methods on.

use strict;
use warnings;
{
package Array;
sub new {
    shift @_;
    my $self = [@_];
    bless($self);
    return $self;
}

sub joinem {
    my $self = shift;
    return join("-", @$self);
}
}

my $test = new Array(1,2,3);
print @$test, "\n";
print $test->joinem(), "\n";

__END__
C:\Perl\test>perl array_obj.pl
123
1-2-3
[download]