import SOAP::Data 'name' || print "\n!Couldn't import!\n"; eval { $service = SOAP::Lite ->name('username' => 'user') ->name('password' => 'pass') ->service('http://server/file.asmx?WSDL'); }; #|| ($_); # $@ will have the error message, perldoc -f eval