http://qs1969.pair.com?node_id=344054

esskar has asked for the wisdom of the Perl Monks concerning the following question:

Hi friends,

i have something like this
package lib::CGI; use strict; use warnings; require CGI; use vars qw(@ISA); @ISA = qw( CGI ); sub redirect { my ($self, $uri) = @_; # print "Location: $uri\n\n"; # works but is nor nice # CGI::redirect($self, $uri); # does not work # $self->redirect($uri); # endless loop # i need help exit(0); }
How do i overload the redirect function so it is working?