sub login_submit{ my $self = shift; . . . if(badlogin()){ return $self->login(); } }