sub show_status {
    my $self=shift;
    print "Log: ", $self->log(), ", Shell: ", $self->shell()."\n";
}