Hi All: I'm using a file handle to pipe a shell script execution.

  my $jobfh = FileHandle->new;
  $jobfh->open("myshscript 2>&1 |");
[download]

Later I do some post processing like:

  while(defined ($line = $jobfh->getline)) 
  { # do something }
[download]

Finally, I need the correct exit code of the shell script. I always get 1 if I do:

  $status = $jobfh->close;
  print $status;
[download]

This is wrong. Can anyone please let me know how to get the correct exit code from the file handle object. Thanks and best regards, Tony

Edited by Chady -- added code tags.