1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
|
package URI::wss;
use strict;
use warnings;
# ABSTRACT: Secure WebSocket support for URI package
our $VERSION = '0.03'; # VERSION
use base qw( URI::ws );
sub default_port { 443 }
sub secure { 1 }
1;
__END__
=pod
=head1 NAME
URI::wss - Secure WebSocket support for URI package
=head1 VERSION
version 0.03
=head1 SYNOPSIS
use URI;
my $uri = URI->new('wss://localhost:3000/foo');
=head1 DESCRIPTION
After this module is installed, the URI package provides the same set
of methods for secure WebSocket URIs as it does for insecure WebSocket
URIs. For insecure (unencrypted) WebSockets, see L<URI::ws>.
=head1 METHODS
=head2 URI::wss->default_port
Returns the default port (443)
=head2 $uri->secure
Returns true.
=head1 SEE ALSO
L<URI>, L<URI::ws>
=cut
=head1 AUTHOR
Graham Ollis <plicease@cpan.org>
=head1 COPYRIGHT AND LICENSE
This software is copyright (c) 2013 by Graham Ollis.
This is free software; you can redistribute it and/or modify it under
the same terms as the Perl 5 programming language system itself.
=cut
|
