perl - How to detect FTP file transfer completion? -
i writing script polls ftp site files , downloads them locally , when available. files deposited ftp site randomly various source parties. need way able detect if file on ftp site has been transferred on source party, before downloading them. thoughts on how go this?
thanks in advance help!
if cannot manipulate ftp server way of checking comes mind polling filesize , if filesize doesn't change longer time can quite sure upload has finished. nobody can guarantee. ideally can adapt ftp server , make execute script after finishing upload.
some pseudo-code:
my %filesizes; %processed; sub poll { foreach (@files_on_ftp) { if($_->filesize == $filesizes{$_->filename} , not $processed{$_->filename}) { process($_); $processed{$_->filename)++; } } }
Comments
Post a Comment