Re^2: perl program return error code to ksh

in reply to Re: perl program return error code to ksh
in thread perl program return error code to ksh

  ${BIN_DIR}/tapeloadListing.pl >> ${LOGS_DIR}/corps.${VERSION_DATE}.l
+og #2>&1
        if (( $? == 0 )); then
                echo "PERL script used to get the tapeload snapshot ra
+n successfully"
        else
                echo "PERL script used to get the tapeload snapshot fa
+iled, hence aborting the script as the files can't be downloaded" | m
+ailx -s "CORP V2 BUILD ERROR - ${VERSION_DATE}" ${MAIL_ADMIN}
                exit 1;
        fi
[download]

The perl code

$fh  =  new FileHandle;
$fh -> open("< /export/home/$ADMIN/pwds/ftp_pass.txt") or die "Error o
+pening FTP password file, $!";
   $TAPELOAD_PWD = sprintf <$fh>;
$fh -> close;
print $TAPELOAD_PWD
chomp($TAPELOAD_PWD);
[download]

If I put in a totally incorrect user in the perl code, the KSH script still continues to run which I want to exit immediately.

Comment on Re^2: perl program return error code to ksh Select or Download Code

Replies are listed 'Best First'.
Re^3: perl program return error code to ksh by blue_cowdawg (Monsignor) on Jun 24, 2014 at 18:42 UTC
add some code tags pretty please? Peter L. Berghold -- Unix Professional Peter -at- Berghold -dot- Net; AOL IM redcowdawg Yahoo IM: blue_cowdawg	[reply]
Re^3: perl program return error code to ksh by RonW (Parson) on Jun 25, 2014 at 15:47 UTC
Are you seeing the message: Error opening FTP password file, .... ? Where you say: If I put in a totally incorrect user in the perl code, the KSH script still continues to run which I want to exit immediately. implies the Perl script error is somewhere else.	[reply]

In Section Seekers of Perl Wisdom