Beefy Boxes and Bandwidth Generously Provided by pair Networks
laziness, impatience, and hubris

Re^6: Stuck on packages

by Yoda_Oz (Sexton)
on Jan 04, 2007 at 07:21 UTC ( [id://592897]=note: print w/replies, xml ) Need Help??

in reply to Re^5: Stuck on packages
in thread Stuck on packages

ARRAY(0x18012b8) is the output.
here is the entire code:
#!/usr/bin/perl package Foo; sub new { my $class = shift; return bless { engine => "engine", wheels => "wheels" }, $class; } sub get_as_array { my $self = shift; return [ $self->{engine}, $self->{wheels} ]; } 1; my $foo = Foo->new; print $foo->get_as_array;

Replies are listed 'Best First'.
Re^7: Stuck on packages
by shigetsu (Hermit) on Jan 04, 2007 at 10:09 UTC
    You need to dereference the array reference returned by get_as_array() by saying @{$foo->get_as_array} before you print it.
Re^7: Stuck on packages
by blazar (Canon) on Jan 04, 2007 at 21:07 UTC
    ARRAY(0x18012b8) is the output.

    Which was expected. Indeed in the post you're replying to, but failed to quote properly, there was clearly written "If you dump the return of this, you'll see it's in an array."

    Just use (e.g.) Data::Dumper's Dump instead of print.

Log In?

What's my password?
Create A New User
Domain Nodelet?
Node Status?
node history
Node Type: note [id://592897]
and the web crawler heard nothing...

How do I use this?Last hourOther CB clients
Other Users?
Others wandering the Monastery: (5)
As of 2024-04-12 15:09 GMT
Find Nodes?
    Voting Booth?

    No recent polls found