MyConfigName #### foo #### use MyInterfaces::EventServiceManager::basicHttp; use SOAP::WSDL; use Data::Dumper; my $service = MyInterfaces::EventServiceManager::basicHttp->new(); my $result = $service->NewEvent({ values => { Description => "The system is down description", # string EntityKey => "foobar", # string EventID => "TestEvent1", # string NoteDescription => "now is the time for all good men to come to the aid of their country", # string SourceSystemID => "test", # string Summary => "The system is down" # string } } ); die $result if not $result; print "$result\n";