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

Re: CGI::Application Error

by chipmunk (Parson)
on Nov 18, 2001 at 10:11 UTC ( #126096=note: print w/replies, xml ) Need Help??


in reply to CGI::Application Error

The problem appears to be in your new method:
sub new { my $self = shift; my $q = $self->query(); my $output; my $dbh = $self->param('dbh'); return $output; }
You are shifting the first argument into $self, and then calling methods on it as if it were an object. However, the point of new is to create an object. The first argument is the name of the class, which in this case is 'bluebox'.

A standard new method might look something like this:

sub new { my $class = shift; my %data = { 'member data' => 'initial value' }; return bless \%data, $class; }
This creates a hash with some initial values, blesses the hash as a member of $class, and returns the resulting object.

In your module, you're inheriting from CGI::Application; you probably want to let CGI::Application create the object.

sub new { my $class = shift; my $self = $class->SUPER::new(); # call CGI::Application's new meth +od # do your own initialization, as desired }
I haven't tested this approach with CGI::Application. It depends on CGI::Application being properly written to support inheritance. That means that CGI::Application's new method, when it calls bless, must use whatever class name was passed in, rather than hard-coding 'CGI::Application'.

Update: P.S. If you don't need to do any extra initialization in the new method, you can simply inherit CGI::Application's new method, rather than defining your own.

Replies are listed 'Best First'.
Re: Re: CGI::Application Error
by czarfred (Beadle) on Nov 19, 2001 at 06:51 UTC
    Thanks for everyone's help. All the input helps a lot. I meant to inherit CGI::Application's new, instead of making my own. Thanks all!

Log In?
Username:
Password:

What's my password?
Create A New User
Node Status?
node history
Node Type: note [id://126096]
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 2020-01-23 13:21 GMT
Sections?
Information?
Find Nodes?
Leftovers?
    Voting Booth?
    Notices?