Beefy Boxes and Bandwidth Generously Provided by pair Networks
Clear questions and runnable code
get the best and fastest answer
 
PerlMonks  

Re^2: new() function: incorrect?

by fmerges (Chaplain)
on Nov 12, 2008 at 10:08 UTC ( #723099=note: print w/ replies, xml ) Need Help??


in reply to Re: new() function: incorrect?
in thread new() function: incorrect?

Hi,

Actually the worst "constructor" I've seen so far came from someone who considered himself an expert and it was like this:

sub new{ my $self = shift; my $dbh = shift; $self->{dbh} = $dbh; return $self; }

On top of that also calls like the following from the caller:

$sDB->{dbh}->disconnect;

And it was not in one module, it was in the whole layer that deals with the DB from a web application running under mod_perl! You can imagine for yourself what sort of strange creatures were also lurking around...

Update: Added emphasis on the worst...

Regards,

fmerges at irc.freenode.net


Comment on Re^2: new() function: incorrect?
Select or Download Code
Re^3: new() function: incorrect?
by ikegami (Pope) on Nov 12, 2008 at 17:28 UTC
    That won't even run. It dies of strictures. Definitely qualifies for worst.

      Hi,

      As you can imagine, there was no use of 'strict' and 'warnings' pragma nowhere, tests, what are tests? Don't want to mention more stuff as I'll get angry ;-)

      Regards,

      fmerges at irc.freenode.net

Log In?
Username:
Password:

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

How do I use this? | Other CB clients
Other Users?
Others musing on the Monastery: (7)
As of 2015-01-27 01:02 GMT
Sections?
Information?
Find Nodes?
Leftovers?
    Voting Booth?

    My top resolution in 2015 is:

















    Results (197 votes), past polls