sub get_foo {
    my $self = shift;
    return $self->{foo};
}
[download]

use strict; use warnings;

package Foo;

sub new {
    my $class = shift;
    return bless { foo => "bar!\n" }, $class;
}

sub get_foo {
    my $self = shift;
    return $self->{foo};
}

1;

my $foo = Foo->new;
print $foo->get_foo;
[download]

ok i understand now!
so what would i need to code if i wanted something like this?

sub new {
    my $class = shift;
    return bless { engine => "engine", wheels => "wheels", etc...}, $c
+lass;
}

sub get_foo {
    my $self = shift;
    return $self->{engine,wheels,etc...};
}
[download]

how do i make it an array or hash or whatever?

Within the getter method you can access any of the attributes, so you just have to put them in the data structure you are wanting to return, such as:

sub get_as_array {
    my $self = shift;
    return [ $self->{engine}, $self->{wheels} ];
}
[download]

Is there something else you were wanting to do? If you dump the return of this, you'll see it's in an array.