package ReportRequest; =pod =begin WSDL _ATTR authuser $string valid username _ATTR authpass $string valid password _ATTR date_from $dateTime report start date (ISO YYYYMMDDTHH:MM) =end WSDL =cut sub new { open LOG, ">>/soapservice.log"; print LOG "ReportRequest:\n"; print LOG Dumper(@_); close LOG; return "ReportRequest"; } 1;