Select Code to Download

sub show_progress {
        my($sftp, $data, $offset, $size) = @_;
        print "downloaded $offset of $size bytes\r";
    }

$sftp->get($REM_FILE)

$sftp->get($REM_FILE, callback => \&show_progress)