Help for this page

Select Code to Download


  1. or download this
    use v5.14;
use Data::Dumper;
...
my $object2 = MyClass->new();

print Dumper($object2->base_file);  # $VAR1 = 'bar'
  2. or download this
    use v5.14;
use Data::Dumper;
...

my $object = MyClass->new(base => __FILE__);
print Dumper($object->base_file);
  3. or download this
    use v5.14;
use Data::Dumper;
...

my $object = MyClass->new(base => __FILE__);
print Dumper($object->base_file);