The Class Constructor Method : Constructor « Class « Perl






  1. Perl
  2. Class
  3. Constructor

The Class Constructor Method

 

# Module: House.pm
package House;                 # Class

sub new {                      #constructor
     my $class = shift;
     my $ref={"Owner"=>undef,   
              "Price" =>undef,  
             };
     bless($ref, $class);
     return $ref;    # A reference to the object is returned
}
1;

# The User of the Module)
#!/usr/bin/perl
use House;
my $houseref = House->new();
print ref($houseref),".\n";








Related examples in the same category

1.Our First Constructor
2.Passing Parameters to Constructor Methods