#!/usr/bin/perl
use warnings;
use strict;

print "What do you want me to do?\n";
my $work = <STDIN>;
chomp $work;

   if ($work eq "permissions") {
     print `sh /root/scripts/security.sh&`;
       print "job sent into background\n";

} elsif ($work eq "apachelog") {
     print `perl /root/scripts/apachelog.pl&`;
       print "job sent into background.\n";

}

exit