Hi all, I'm trying to figure this out, I'd appreciate any help. I have an application that I am using a perl script to do pattern matching and then execute commands specific to that application. I need a way to handle an error in my script if one of the `cmd blah`; doesn't work and send it to an error subroutine.
Here's what I have now: <SNIPPED> sub subscription { ($passed_ep,$passed_pr$passed_sub,$passed_org,$passed_plat)=shift; #add error routine to handle if PR/PM doesn't exist -pass to exception_sub? `wsub \@ProfileManager:Staging \@Endpoint:$passed_ep`; `wln \@Endpoint:$passed_ep \@PolicyRegion:$passed_pr\.$passed_org`; `wsub \@ProfileManager:$passed_sub\.$passed_org\.$passed_plat\.ep \@Endpoint:$passed_ep`; # on error pass ($ep,$pr,$sub,$org,$plat) } sub exception_sub { ($passed_ep,$passed_pr$passed_sub,$passed_org,$passed_plat)=shift; `wsub \@ProfileManager:Exceptions \@Endpoint:$passed_ep`; print AFTERLOG "$passed_ep cannot go to $passed_org - Check PR Structure\n"; } I tried: `wsub \@ProfileManager:Staging \@Endpoint:$passed_ep` || exception_sub($passed_ep); but that didn't work. -Paul Farley [EMAIL PROTECTED] -- To unsubscribe, e-mail: [EMAIL PROTECTED] For additional commands, e-mail: [EMAIL PROTECTED]