Ever Get board, then think of something you have been meaning to do, like make a simple solution to a rather annoying problem? Well my problem was, I kept getting kicked off of my server cause I idle to long sometimes. So to save the hassle of having to reconnect, I came up with the little bit of code below. After I made this, my sys admin told me there is a way to set a variable in bash to keep it from timing you out, oh well, no useful code so go to waste so I say.

Here is the result of a few min's of boredom:

#!/usr/bin/perl -w
#Script To Keep Term From Idling To long
#To Avoid Being Dissconnected from Server
#CTRL-C To Kill.
#Happy Idling!
use strict;
print "\nKeep Me Alive! CTRL-C to Kill Once Started\n";
print "\nDo you Want To Put Me To Sleep Now?(y,n):";
my $answ;
chomp($answ=<STDIN>);
if ($answ=~ /y/) { &sleep }
else{ print "\nFine, I didn't want a nap anyways!\n\n"; }

sub sleep {
my $sleep = sleep 30;
&sleep;
}
[download]

-- Yes, I am a criminal. My crime is that of curiosity.