Select Code to Download

#!/usr/bin/perl

...
  die "Unable to establish a SFTP connection: ",
  $sftp->error;
$sftp->get('/root/foo.txt', '/root/foo2.txt');