Thread Net::FTP Verbindungsaufbau schlägt fehl (9 answers)
Opened by Stefan_S at 2016-09-23 19:02

Stefan_S
 2016-09-23 19:02
#185421 #185421
User since
2014-04-15
30 Artikel
BenutzerIn
[default_avatar]
Servus,

mit Net::FTP übertrage ich erfolgreich Daten von meinem Entwicklungsrechner (W10x64) auf unseren Webserver. Rufe ich das identische Script aber von unserem Server (W2012R2x64) auf, kommt keine Verbindung zustande.

Exemplarisch habe ich das Script auf das Wesentliche reduziert:
Code (perl): (dl )
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
use strict;
use warnings;

use Net::FTP;


# Variablen setzen
my %ftp = (
        ftp_server => 'meinserver.de',
        ftp_user => 'user',
        ftp_pw => 'passwort',
        ftp_file => 'datei',
);

&ftp_put (\%ftp);


# FTP-Übertragung
sub ftp_put {
        my $ftp = shift;
        my $ftp_handle = Net::FTP -> new ( $ftp{ftp_server}, Debug => 1, Passive => 1 ) or die "Kann mit '$ftp{ftp_server}' nicht verbinden: $@\n";             # Verbindung mit FTP-Server aufbauen
}


Vom W10-Rechner aus erhalte ich folgendes Protokoll:
Code: (dl )
1
2
3
4
5
6
7
8
9
10
Process started >>>
Net::FTP>>> Net::FTP(3.10)
Net::FTP>>> Exporter(5.72)
Net::FTP>>> Net::Cmd(3.10)
Net::FTP>>> IO::Socket::SSL(2.027)
Net::FTP>>> IO::Socket::IP(0.37)
Net::FTP>>> IO::Socket(1.38)
Net::FTP>>> IO::Handle(1.36)
Net::FTP=GLOB(0x26c6c3c)<<< 220 ProFTPD 1.3.5b Server (ProFTPD) [xx.xx.xx.xx]
<<< Process finished. (Exit code 0)

Also alles prima.

Vom W2012-Server aus erhalte ich folgendes Protokoll:
Code: (dl )
1
2
3
4
5
6
7
8
9
10
Process started >>>
Net::FTP>>> Net::FTP(3.10)
Net::FTP>>> Exporter(5.67)
Net::FTP>>> Net::Cmd(3.10)
Net::FTP>>> IO::Socket::INET6(2.69)
Net::FTP>>> IO::Socket(1.34)
Net::FTP>>> IO::Handle(1.33)
Net::FTP: Net::Cmd::_is_closed(): unexpected EOF on command channel: at K:\utils.pl line 21.
Kann mit 'meinserver.de' nicht verbinden: [Net::FTP] Connection closed
<<< Process finished. (Exit code 9)

Die gleiche Meldung erhalte ich auch, wenn ich testhalber die Windows-Firewall deaktiviere.

Wenn ich bewusst einen nicht existierenden Servernamen eingebe, erhalte ich folgendes Protokoll:
Code: (dl )
1
2
3
Process started >>>
Kann mit 'unbekannterserver.de' nicht verbinden: Net::FTP: getaddrinfo: Der angegebene Host ist unbekannt.
<<< Process finished. (Exit code 22)


Weiß jemand Rat?

Viele Grüße
Stefan

View full thread Net::FTP Verbindungsaufbau schlägt fehl