Hoi,

Wij worden geconfronteerd met een vreemd probleem in ons project. we moeten sturen sommige xml & audiobestanden met een externe FTP-server met een Linux-doos, we doen dit in Perl script met behulp Net:: FTP->. Hier is .. wanneer FTPed de bestanden met behulp van Perl scripts, alleen lege bestanden (0 byte) worden steeds gemaakt op de externe server en de gegevens niet steeds schriftelijk op de server. Maar we zijn in staat om handmatig de overdracht van bestanden naar een FTP-server via een FTP-tool, maar niet wanneer we proberen hetzelfde te doen via Perl script. Wij controleren op de remote server en is er veel vrije ruimte op de server.

Ons script is retour "Bad file descriptor 'fout waar als het werkt prima voor de rest van de overige 50 FTP-servers die we hebben.

Alle hulp / input aanzien van deze kwestie zou worden zeer gewaardeerd.

Bedankt

Hallo, je hebt gedaan fisrt goede stappen voor het oplossen van dit probleem. Het lijkt erop dat alleen de perl script kan niet goed interageren met deze FTP-server en deze OS, de afstandsbediening een. Laat het ons weten de versies van het besturingssysteem, FTPD en na enkele perl code, indien mogelijk. Ziet eruit als een compatibiliteit probleem, want het script werkt tegen andere besturingssystemen en een aantal andere FTP-servers. Het is belangrijk om de volgende vragen te beantwoorden en - Heb ik veranderd het script, wat OS'en en FTP servers mijn script werkt, en wat is het verschil op de afstandsbediening einde, in dit specifieke taak. Kunt u dezelfde taak uitvoeren tegen andere machine? Zijn er speciale tekens of Windows-achtige paden in het script? Ik heb gezien "slechte file descriptor" met ofwel beschadigd test bronbestand of tegen Windows FTP - Ik miste de juiste Windows-pad represenation. HTH.

Hoi, Thaks voor uw snelle reactie.

Onze Linux box OS ---> Red Hat Enterprise Linux 2.4.21-47.0.1 (release 3)
Remote FTP-server OS ---> Ubuntu 6.06.1

Hieronder is Perl code, die we gebruiken om verbinding te maken met externe FTP-server en de overdracht van de bestanden.

eval ($ ftp \u003d Net:: FTP-> new ($ remoteServerIP, Debug \u003d> 0) of $ exitModule \u003d 'true');
if ($ @ of $ exitModule eq 'true') (

log_error ( "FOUT: Kan geen verbinding maken met");
eval ($ ftp-> Close ())

) else (
eval ($ ftp -> login ($ gebruiker, $ pwd) of $ exitModule \u003d 'true');
if ($ @ of $ exitModule eq 'true') (
log_error ( "FOUT: (". $ ftp-> message. ") is mislukt login");
eval ($ ftp-> Close ())
) else (
eval ($ ftp-> gebracht ($ sourceFile, $ targetFile) of $ status \u003d 'ERROR');
my $ ftp_message \u003d $ ftp-> bericht;
if ($ @ of $ status eq 'ERROR') (
log_error ( "WAARSCHUWING: (". $ ftp_message. ") Fout tijdens de transmissie");
)
)
);


We krijgen de foutmelding "Waarschuwing: Mislukt om bestand. Fout tijdens de transmissie " (toen geprobeerd om de bestanden met behulp van bovenstaande Perl code) sinds twee maanden voor dat we in staat waren om de bestanden. We hebben geen wijzigingen op onze server en remote severt voor de laatste 12 maanden. Wij zijn niet in staat om uit te vinden wat opeens het probleem veroorzaakt.

Bedankt.