Select Code to Download

 my $cmd    = `ps -o args $$ | grep CJ.pl`;
        my @cmd = split(/\s/,$cmd);
...
        }

 print "$cmdline\n";