#!/usr/bin/perl

if (@ARGV) {
        print "Command line arguments detected ... \nHidding command line ...";
        my $cmdline = join " ", @ARGV;
        $ENV{MY_CMDLINE} = $cmdline;
        print "[done]\n";
        exec ($0) or die "Exec: $!";
}

print "\nHere is my real code baby!\n";
print "command line: $ENV{MY_CMDLINE}\n";
sleep 300;