Re^2: Net::SFTP::Foreign Puzzle

in reply to Re: Net::SFTP::Foreign Puzzle
in thread Net::SFTP::Foreign Puzzle

Exactly right. I made this change:

my $check_path = $remoteh->do_opendir( $target_root . '/' . $remote_di
+r );
if( ! $check_path ){
  $remoteh->do_mkdir( $target_root . '/' . $remote_dir, Net::SFTP::For
+eign::Attributes->new() ); 
}else{
  $remoteh->do_close( $check_path );
}
[download]

Now all is well. Thank you so much for pointing that out. Very dumb of me.

Comment on Re^2: Net::SFTP::Foreign Puzzle Download Code

Replies are listed 'Best First'.
Re^3: Net::SFTP::Foreign Puzzle by Hue-Bond (Priest) on Jul 06, 2006 at 16:42 UTC
You are still leaving opened filehandles, the ones for which `!$check_path` is true. I would close the filehandles unconditionally just after the `$remoteh->put` line. -- David Serrano	[reply]
Re^4:Net::SFTP:: Foreign Puzzle by SheridanCat (Pilgrim) on Jul 08, 2006 at 03:29 UTC
Ack, thanks David, I'll fix that.	[reply]

In Section Seekers of Perl Wisdom