Re^3: hash reference to itself

[VinsWorldcom]

You're right. Is this better?

#!perl

use strict;
use warnings;

package MyPkg;

sub new {
    my ($self, $name) = @_;
    my %hash = (
        name => $name
    );
    return bless \%hash;
}

sub print {
    my $self = shift;
    print "name: " . $self->{name};
}

package main;

my $obj = MyPkg->new('foo');
$obj->print();

[Your Mother]

Yeppers. Though I am not a fan of anything but a view layer (this would be main:: implicitly here) doing output so print embedded in methods/subs is, to me, code smell. I understand it's convenient for examples but it can rub off on newbies as a good practice.