my $check_path = $remoteh->do_opendir( $target_root . '/' . $remote_dir ); if( ! $check_path ){ $remoteh->do_mkdir( $target_root . '/' . $remote_dir, Net::SFTP::Foreign::Attributes->new() ); }else{ $remoteh->do_close( $check_path ); }