Modul Net::FTP merupakan modul yang dibuat untuk keperluan upload maupun download berbasis web. Modul ini selain mudah digunakan juga relatif handal, modul ini biasa di pakai oleh para pengguna perl-cgi. Adapun penggunaan modul tersebut adalah sebagai berikut : use Net::FTP; my $user ="johan"; my $password ="johan"; my $connection ="192.168.1.11"; my $data ="wol.tar"; $ftp = Net::FTP->new("$conection", Debug => 0) or die "Cannot connect to some.host.name: $@"; $ftp->login("$user","$password") or die "Cannot login ", $ftp->message; $ftp->cwd("/") or die "Cannot change working directory ", $ftp->message; -------------------------------------------------------- Ini kalo mau upload $ftp->put("$data") or die "get failed ", $ftp->message; --------------------------------------------------...
Komentar
»