Mega Code Archive

 

Categories / Perl / Class

 

How to create an object

#First we create an anonymous hash,  #then bless it into a package package House; my $ref = { "Owner"=>"Tom",              "Price"=>"25000", # Properties/attributes           }; bless($ref, House); print "\$ref is: $ref.\n"; print ref($ref), ".\n";