in reply to Re: Difference in retrieving values from a varchar2 column and number column from DB
in thread Difference in retrieving values from a varchar2 column and number column from DB
Do you mean the :: in return $obj->SUPER::new(@args);? SUPER calls the base class method of the object. For example:
use strict; use warnings; package Base; sub method { my ($self) = @_; my $class = ref $self; print "In Base::method(). I'm a $class instance.\n"; } package Derived; push @Derived::ISA, 'Base'; sub new { my ($class) = @_; return bless {}, $class; } sub method { my ($self) = @_; print "In Derived::method()\n"; $self->SUPER::method(); } package main; my $obj = Derived->new(); $obj->method();
Prints:
In Derived::method() In Base::method(). I'm a Derived instance
True laziness is hard work
|
---|
Replies are listed 'Best First'. | |
---|---|
Re^3: Difference in retrieving values from a varchar2 column and number column from DB
by Anonymous Monk on Dec 03, 2013 at 13:48 UTC | |
Re^3: Difference in retrieving values from a varchar2 column and number column from DB
by Arun Kumar (Novice) on Dec 03, 2013 at 17:06 UTC |
In Section
Seekers of Perl Wisdom