Select Code to Download

perl -e ' $apache = qx(ps -ef | grep httpd); @fields=split /\s+/, $apa
+che; 
exec ("chown $fields[0] /path/to/flat/file/directory");'