AXL-Client-Simple

 view release on metacpan or  search on metacpan

inc/Module/Install/Metadata.pm  view on Meta::CPAN

			# It's in core of perl >= 5.9.3, and should be installed
			# as one of the Pod::Simple's prereqs, which is a prereq
			# of Pod::Text 3.x (see also below).
			$author =~ s{ E<( (\d+) | ([A-Za-z]+) )> }
			{
				defined $2
				? chr($2)
				: defined $Pod::Escapes::Name2character_number{$1}
				? chr($Pod::Escapes::Name2character_number{$1})
				: do {
					warn "Unknown escape: E<$1>";
					"E<$1>";
				};
			}gex;
		}
		elsif (eval "require Pod::Text; 1" && $Pod::Text::VERSION < 3) {
			# Pod::Text < 3.0 has yet another mapping table,
			# though the table name of 2.x and 1.x are different.
			# (1.x is in core of Perl < 5.6, 2.x is in core of
			# Perl < 5.9.3)
			my $mapping = ($Pod::Text::VERSION < 2)
				? \%Pod::Text::HTML_Escapes
				: \%Pod::Text::ESCAPES;
			$author =~ s{ E<( (\d+) | ([A-Za-z]+) )> }
			{
				defined $2
				? chr($2)
				: defined $mapping->{$1}
				? $mapping->{$1}
				: do {
					warn "Unknown escape: E<$1>";
					"E<$1>";
				};
			}gex;
		}
		else {
			$author =~ s{E<lt>}{<}g;
			$author =~ s{E<gt>}{>}g;
		}
		$self->author($author);
	} else {

lib/AXL/Client/Simple.pm  view on Meta::CPAN

    });
}

sub BUILDARGS {
    my ($class, @rest) = @_;
    my $params = (scalar @rest == 1 ? $rest[0] : {@rest});

    # collect AXL password from environment as last resort
    $params->{password} ||= $ENV{AXL_PASS};

    # URI escape the username and password
    $params->{username} ||= '';
    $params->{username} = URI::Escape::uri_escape($params->{username});
    $params->{password} = URI::Escape::uri_escape($params->{password});

    return $params;
}

__PACKAGE__->meta->make_immutable;
no Moose;
1;

__END__

share/AXLSoap.xsd  view on Meta::CPAN

							<xsd:documentation>This tag is ignored and destAddrIsSRV is set to false if destinationaddress is an IP address and destinationport is mentioned correctly.</xsd:documentation>
						</xsd:annotation>
					</xsd:element>
					<xsd:element name="destinationport" type="xsd:integer" default="0" minOccurs="0">
						<xsd:annotation>
							<xsd:documentation>This tag depends on destAddrIsSRV. It is mandatory when destAddrIsSRV is false or when destination address is an IP address. Valid values between 1024 to 65535 (inclusive)</xsd:documentation>
						</xsd:annotation>
					</xsd:element>
					<xsd:element name="tkSipCodec" type="xsd:string" nillable="false" minOccurs="0"><!--This field is of the type axl:XSIPCodec in AXLEnums.xsd-->
						<xsd:annotation>
							<xsd:documentation>The ampersand is a reserved character in xml. It can be escaped as "&amp;"</xsd:documentation>
						</xsd:annotation>
					</xsd:element>
					<xsd:element name="sigDigits" minOccurs="0">
						<xsd:annotation>
							<xsd:documentation>The value of sigDigits  must be either from 0 to 32 or 99. Here 99 means All. enable attribute is Read-Only. If sigDigits is 0-32 then enable is true, if sigDigits is 99 then enable is false.</xsd:documentation>
						</xsd:annotation>
						<xsd:complexType>
							<xsd:simpleContent>
								<xsd:extension base="xsd:nonNegativeInteger">
									<xsd:attribute name="enable" type="xsd:boolean" use="optional"/>

share/AXLSoap.xsd  view on Meta::CPAN

					</xsd:element>
					<xsd:choice minOccurs="0">
						<xsd:annotation>
							<xsd:documentation>The new Security Profile for this phone.  Nullable.</xsd:documentation>
						</xsd:annotation>
						<xsd:element name="securityProfileId" type="axlapi:XUUID"/>
						<xsd:element name="securityProfileName" type="axlapi:UniqueString50"/>
					</xsd:choice>
					<xsd:element name="tkSipCodec" type="xsd:string" nillable="false" minOccurs="0"><!--This field is of the type axl:XSIPCodec in AXLEnums.xsd-->
						<xsd:annotation>
							<xsd:documentation>The ampersand is a reserved character in xml. It can be escaped as "&amp;"</xsd:documentation>
						</xsd:annotation>
					</xsd:element>
					<xsd:choice minOccurs="0">
						<xsd:element name="sipProfileId" type="axlapi:XUUID"/>
						<xsd:element name="sipProfileName" type="axlapi:UniqueString50"/>
					</xsd:choice>
					<xsd:element name="sigDigits" minOccurs="0">
						<xsd:annotation>
							<xsd:documentation>The value of sigDigits  must be either from 0 to 32 or 99. Here 99 means All. enable attribute is Read-Only. If sigDigits is 0-32 then enable is true, if signDigits is 99 then enable is false.</xsd:documentation>
						</xsd:annotation>