Beefy Boxes and Bandwidth Generously Provided by pair Networks
laziness, impatience, and hubris

(Re)+: A few Perl OOP questions. (disparaging)

by rir (Vicar)
on Oct 24, 2003 at 18:17 UTC ( #301916=note: print w/ replies, xml ) Need Help??

in reply to Re^2: A few Perl OOP questions. (disparaging)
in thread A few Perl OOP questions.

I dislike the idiom because it promotes ambiguous code. The author of  $obj->new(); hides something that the author of  (ref $obj)->new(); tells you.

Often it makes no real difference and the noise is about who is being forced to write code to accomodate someone else. I try to be more cooperative.

Usually I would write your new more like this.

sub new { my $class = shift( @_); croak "Bad class parameter" if not defined $class or ref $class; bless [@_], $class; }
Which gives a message like:

Bad class parameter at line 100

What is it that you find fine about the idiom?

Comment on (Re)+: A few Perl OOP questions. (disparaging)
Select or Download Code

Log In?

What's my password?
Create A New User
Node Status?
node history
Node Type: note [id://301916]
and the web crawler heard nothing...

How do I use this? | Other CB clients
Other Users?
Others having an uproarious good time at the Monastery: (5)
As of 2015-09-01 09:04 GMT
Find Nodes?
    Voting Booth?

    The oldest computer book still on my shelves (or on my digital media) is ...

    Results (368 votes), past polls