Select Code to Download

List of Services
==================
...
FS:2355:Payments:Down
RS:4555:Retail:Up
LD:682111:Legal:Up

Services List:
==============
...
4. Legal::Up
Please enter the # to call the service:
Enter A for all the services

host();
my $it=1;
...
$input=trim($input);# I've function written for taking the spaces of i
+nput
print " The input after chopping:$input\n";
}