1Net::OpenID::Yadis::SerUvsiecre(C3o)ntributed Perl DocumNeentt:a:tOipoennID::Yadis::Service(3)
2
3
4
6 Net::OpenID::Yadis::Service - Class representing an XRDS Service
7 element
8
10 version 1.20
11
13 use Net::OpenID::Yadis;
14 my $disc = Net::OpenID::Yadis->new();
15 my @xrd = $disc->discover("http://id.example.com/") or Carp::croak($disc->err);
16
17 foreach my $srv (@xrd) { # Loop for Each Service in Yadis Resourse Descriptor
18 print $srv->priority; # Service priority (sorted)
19 print $srv->Type; # Identifier of some version of some service (scalar, array or array ref)
20 print $srv->URI; # URI that resolves to a resource providing the service (scalar, array or array ref)
21 print $srv->extra_field("Delegate","http://openid.net/xmlns/1.0");
22 # Extra field of some service
23 }
24
26 After Net::OpenID::Yadis performs discovery, the result is a list of
27 instances of this class.
28
30 $srv->priority
31 The priority value for the service.
32
33 $srv->Type
34 The URI representing the kind of service provided at the endpoint
35 for this record.
36
37 $srv->URI
38 The URI of the service endpoint.
39
40 $srv->extra_field( $fieldname , $namespace )
41 Fetch the value of extension fields not provided directly by this
42 class.
43
44 If $namespace is not specified, the default is the namespace whose
45 name is the empty string.
46
48 See Net::OpenID::Yadis for author, copyright and licensing information.
49
51 Net::OpenID::Yadis
52
53 Yadis website: <http://yadis.org/>
54
55
56
57perl v5.34.0 2021-07-22 Net::OpenID::Yadis::Service(3)