I can not seem to get this script to retrieve any files any help would be greatly appreciated

#!/usr/local/bin/perl -w

use strict
use Net::SFTP;

my $host = "somehost";
my $password = "somepasswd";
my $user = "someuser";

my $sftp = Net::SFTP->new($host,"user" => $user,"password" => $passwor
+d);
$sftp->get("/var/log/httpd/access_log");
[download]

When I do this

#!/usr/local/bin/perl -w

use strict
use Net::SFTP;

my $host = "somehost";
my $password = "somepasswd";
my $user = "someuser";

my $sftp = Net::SFTP->new($host,"user" => $user,"password" => $passwor
+d);
print $sftp->get("/var/log/httpd/access_log"); <<<---|||
[download]

I do get the file at stdout. What am I doing wrong
learning monk2b