http://www.perlmonks.org?node_id=1061531


in reply to How to retrieve files at least 5 minutes old using sftp foreign

my $until = time - 5 * 60;
$sftp->mget($filemask, $dest,
            wanted => sub { $_[1]->{a}->mtime < $until });

[download]
  • Comment on Re: How to retrieve files at least 5 minutes old using sftp foreign
  • Download Code

In Section Seekers of Perl Wisdom