/usr/local/CPAN/Net-YahooMessenger/Net/YahooMessenger/InvalidLogin.pm

• package Net::YahooMessenger::InvalidLogin
  • is_enable
  • to_string
• __END__
• EOF

package Net::YahooMessenger::InvalidLogin;
use base 'Net::YahooMessenger::Event';
use strict;

sub is_enable { undef }

sub to_string {
    my $self = shift;
    "Invalid Login\n";
}

1;
__END__