I do not understand the error CGI that I get CGI using Email:: Simple

[fakessh]

hello all
hello pep network
hello guru of perl

This class is named message
this:

[r...@r13151 ~]# cat /usr/lib/perl5/site_perl/5.8.8/PerlWebmail/Message.pm
package PerlWebmail::Message;
use base qw(MIME::Lite);
use base qw(Email::Simple);

sub new
{
  my $class = shift;

  my $self = $class->SUPER::new(@_);

  return $self;
}

sub mail 
{
    my ($self, $message) = @_;
    my $obj = Email::Simple->new($message);
    print $obj->as_string;
    $Self->new;

}

1;