Initial Commit
This commit is contained in:
7
database/contrib/ftp-mit-perl.pl
Normal file
7
database/contrib/ftp-mit-perl.pl
Normal file
@@ -0,0 +1,7 @@
|
||||
use Net::FTP;
|
||||
print "Content-Type: text/html\n\n";
|
||||
$ftp = Net::FTP->new("localhost"); # Unser Host
|
||||
die "Konnte keine Verbindung aufbauen $!" unless $ftp;
|
||||
$ftp->login("newuser", "wampp"); # Hier Benutzername und Password eingeben
|
||||
$ftp->get("index.php");
|
||||
$ftp->quit;
|
||||
Reference in New Issue
Block a user