I think your pattern match will only catch a literal AZ_OK, not the constant. And I'm not sure, but AZ_OK might evaluate to 0. At least I think I remember having trouble with that module because it returns 0 on success, and I kept testing for TRUE/FALSE based on the return status.
-----Original Message----- From: Dan Muey [mailto:[EMAIL PROTECTED] Sent: Tuesday, August 05, 2003 2:32 PM To: [EMAIL PROTECTED] Subject: Archive::Zip funnny return status use Archive::Zip; ... my $member = $zip->memberNamed($zippedfile); my $rc = $member->extractToFileNamed($unzippedfile); if($rc =~ m/AZ_OK/) { print "ok -$rc-\n; } else { print "Bad -$rc-\n"; } The code above *always* prints: Bab -0- But $unzippedfile is created properly, everytime, even if I delete it first and run it again!!! So shouldn't $rc have AZ_OK in it or even better be 1 on success? Or is writing the text file in the zip archive to a local text file not success? What could I be doing wrong/missing? TIA Dan -- To unsubscribe, e-mail: [EMAIL PROTECTED] For additional commands, e-mail: [EMAIL PROTECTED] -- To unsubscribe, e-mail: [EMAIL PROTECTED] For additional commands, e-mail: [EMAIL PROTECTED]
