Select Code to Download

use strict;
use mship;
...
    my $stats=($status{status} == 0) ? "Up" : "Down";
    $text->insert('end', "$status{remote_name} is $stats\n");
}

use strict;
use warnings;
...
=cut

1; # End of mship