in reply to if and unless

I guess:
if ( ...... ){ &DoSomething(); } else { &SomethingScrewedUp(); }

Best regards,
perl -e "print a|r,p|d=>b|p=>chr 3**2 .7=>t and t"