http://www.google.ru/search?q=webshell+perl&ie=utf-8&oe=utf-8&aq=t&rls=org.mozilla:rufficial&client=firefo x-a

http://mentat.sibintercom.ru/Nemo/shell/r57pws.pl.txt ссыль два