[Ssh-sftp-perl-users] Couldn't fsetstat: Failure

[William C. Sr. <wil...@ya...>]

Hello,

I am getting:

Couldn't fsetstat: Failure at
/usr/local/lib/perl5/site_perl/5.6.1/Net/SFTP.pm line
200.

ever since the sftp server software on the Solaris box
that I sftp with was recently upgraded. The file
transfers seem to still work fine.

The sftp client box I get the message on is also Sun
Solaris Unix and I have not chamged anything on it.

An excerpt from my code where I think the message is
getting triggered is here:


chdir "$HOMEDIR/getrct";
while (<*>) {
  $fn=$_;
  if ($fn=~/^([0-9A-Za-z]+)_([\w-]+)\.(rct|dhr|tmd)$/
&& $locdir{$1}) {
    $locd=$1; # location code
    $fname=$2; # name without loc code or extension
    $dirp=equatelocs(o,$locdir{$locd});
    $sftp->put("$fn", "$dirp/$locd\_$fname\.rc_");
    $sftp->do_rename("$dirp/$locd\_$fname\.rc_",
"$dirp/$fn");
    move ("$fn", "$HOMEDIR/getrctd") or do {warn "$!";
next};
    logmon(dnrct, "$HOMEDIR/getrctd/$fn", "RTSU")
             or do {warn "$!"; next};
    $fcntp++;
  }
}


I looked at SFTP.pm and I think it's the do_rename.

As an applictions person, it is easier to change my
application code than to get the perl packages
changed.

The error generates a lot of error email do be sifted
through so I would like to fix it, or if it isn't
hurting anything, I'd like to eliminate that
particular error message.

Thank you so much for any help on this issue.

Will Cardwell