http://qs321.pair.com?node_id=947582


in reply to What's the meaning of die ref $res... ?

Look for the Ternary operator in the perlop doc.
ref $res ? $res->faultstring : $soap->transport->status
Could be written as
if (ref $res){ #$res is a reference and not a scalar die $res->faultstring; # exit printing the fault } else{ die $soap->transport->status; #Exit with the current transport statu +s of the SOAP object }
print "Good ",qw(night morning afternoon evening)[(localtime)[2]/6]," fellow monks."