in reply to Getting remote files
An Example(UNTESTED):
Then, you can either move the file manually, or if your wanting to keep it as automated as possible add something like this:#!/usr/bin/perl -w use strict; use Net::FTP; my $file="filename"; my $rdir="/path/to/remote/dir"; my $ftp = Net::FTP->new("yourhost.com", Debug => 0); $ftp->login("username",'-username@'); $ftp->cwd("$rdir"); $ftp->get("$file"); $ftp->quit;
my $ldir="/path/to/local/script"; system("mv", "$rdir$/$file", "$ldir");
--~~--~~--~~--~~--~~--~~--~~--~~--~~--~~--~~--~~--~~--
perl -e '$a="3567"; $b=hex($a); printf("%2X\n",$a);'
|
|---|