URGENT!! Security Problem! Problema de segurança!

################
#In English
--------------------------------
Below it follows the code source of a script in PERL that makes a simulation of the access SSH root, doesn't use the port SSH, doesn't use the service SSH, work with SSH disabled, with Telnet disabled, can cause a big problem in the server, can copy the files of the sites(accounts) and very more.... Run command how: $wget, $cd / $cp, can run DDOS programs, IRC, BCN.... I ask that creates a subdomain, simulating a account of normaly customer and install the script, for to test and to see the danger level!

################
#Em português - Brasil
---------------------------------
Abaixo segue o código fonte de um script em PERL que faz a simulação de um acesso SSH, não usa a porta SSH, não usa o serviço SSH, funciona com o SSH desabilitado, com Telnet desabilitado, pode causar grandes problemas no servidor, pode copiar sites hospedados no servidor e muito mais.... Executar comandos como: $wget, $cd / $cp, pode rodar programas DDOS, IRC, BCN.... Eu peço que você crie um subdomínio afim de simular um cliente normal usando esse script, para ver o nivel de perigo do mesmo.


For test proceeds the file attached!
Use the password: teste
For access script in your subdomain!