Moin
use Net::FTP;
use CGI;
$q = new CGI;
my $host_name = $q->param('hostname');
$ftp = Net::FTP->new($host_name); # klappt!
Ich kenn mich da ja nicht besonders aus, aber fehlt hier nicht $ftp->login oder hast du das nur nicht mit gepostet?
sub download{
»» # Alle Variablen sind belegt
»» $ftp->get($remote_datei, $lokale_datei); # Schlägt fehl, Rückgabe ist stets ""
}
Viele Grüße aus Erfurt, Rolf (Domspatz)
PS: Kleiner Ausblick auf das fertige Proggi ;-)http://www.i-netlab.de/cgi-bin/rftp_demo.cgi
Sieht gut aus! *g*
Stephan