use Net::FTP; BEGIN { $SIG{__DIE__} = 'IGNORE' } my $ftp = Net::FTP->new(); $ftp->abcd; print "TESTE\n"; exit(1); Alguem sabe dizer se esse erro emite sinal ? -------------- Próxima Parte ---------- Um anexo em HTML foi limpo... URL: http://mail.pm.org/pipermail/saopaulo-pm/attachments/20080425/407eb7c3/attachment.html