[ SEA-GHOST MINI SHELL]

Path : /proc/2/cwd/proc/2/cwd/usr/bin/
FILE UPLOADER :
Current File : //proc/2/cwd/proc/2/cwd/usr/bin/perldoc

#!/usr/bin/perl

eval 'exec /usr/bin/perl  -S $0 ${1+"$@"}'
    if 0; # not running under some shell

require 5;
BEGIN { $^W = 1 if $ENV{'PERLDOCDEBUG'} }
use Pod::Perldoc;
exit( Pod::Perldoc->run() );

SEA-GHOST - SHELL CODING BY SEA-GHOST