summaryrefslogtreecommitdiff
path: root/systems/texlive/tlnet/tlpkg/tlperl/site/lib/URI
diff options
context:
space:
mode:
Diffstat (limited to 'systems/texlive/tlnet/tlpkg/tlperl/site/lib/URI')
-rw-r--r--systems/texlive/tlnet/tlpkg/tlperl/site/lib/URI/Escape.pm2
-rw-r--r--systems/texlive/tlnet/tlpkg/tlperl/site/lib/URI/Heuristic.pm2
-rw-r--r--systems/texlive/tlnet/tlpkg/tlperl/site/lib/URI/IRI.pm2
-rw-r--r--systems/texlive/tlnet/tlpkg/tlperl/site/lib/URI/QueryParam.pm2
-rw-r--r--systems/texlive/tlnet/tlpkg/tlperl/site/lib/URI/Split.pm2
-rw-r--r--systems/texlive/tlnet/tlpkg/tlperl/site/lib/URI/URL.pm2
-rw-r--r--systems/texlive/tlnet/tlpkg/tlperl/site/lib/URI/WithBase.pm2
-rw-r--r--systems/texlive/tlnet/tlpkg/tlperl/site/lib/URI/_foreign.pm2
-rw-r--r--systems/texlive/tlnet/tlpkg/tlperl/site/lib/URI/_generic.pm2
-rw-r--r--systems/texlive/tlnet/tlpkg/tlperl/site/lib/URI/_idna.pm2
-rw-r--r--systems/texlive/tlnet/tlpkg/tlperl/site/lib/URI/_ldap.pm2
-rw-r--r--systems/texlive/tlnet/tlpkg/tlperl/site/lib/URI/_login.pm2
-rw-r--r--systems/texlive/tlnet/tlpkg/tlperl/site/lib/URI/_punycode.pm2
-rw-r--r--systems/texlive/tlnet/tlpkg/tlperl/site/lib/URI/_query.pm2
-rw-r--r--systems/texlive/tlnet/tlpkg/tlperl/site/lib/URI/_segment.pm2
-rw-r--r--systems/texlive/tlnet/tlpkg/tlperl/site/lib/URI/_server.pm2
-rw-r--r--systems/texlive/tlnet/tlpkg/tlperl/site/lib/URI/_userpass.pm2
-rw-r--r--systems/texlive/tlnet/tlpkg/tlperl/site/lib/URI/data.pm2
-rw-r--r--systems/texlive/tlnet/tlpkg/tlperl/site/lib/URI/file.pm2
-rw-r--r--systems/texlive/tlnet/tlpkg/tlperl/site/lib/URI/file/Base.pm2
-rw-r--r--systems/texlive/tlnet/tlpkg/tlperl/site/lib/URI/file/FAT.pm2
-rw-r--r--systems/texlive/tlnet/tlpkg/tlperl/site/lib/URI/file/Mac.pm2
-rw-r--r--systems/texlive/tlnet/tlpkg/tlperl/site/lib/URI/file/OS2.pm2
-rw-r--r--systems/texlive/tlnet/tlpkg/tlperl/site/lib/URI/file/QNX.pm2
-rw-r--r--systems/texlive/tlnet/tlpkg/tlperl/site/lib/URI/file/Unix.pm2
-rw-r--r--systems/texlive/tlnet/tlpkg/tlperl/site/lib/URI/file/Win32.pm2
-rw-r--r--systems/texlive/tlnet/tlpkg/tlperl/site/lib/URI/ftp.pm2
-rw-r--r--systems/texlive/tlnet/tlpkg/tlperl/site/lib/URI/gopher.pm2
-rw-r--r--systems/texlive/tlnet/tlpkg/tlperl/site/lib/URI/http.pm2
-rw-r--r--systems/texlive/tlnet/tlpkg/tlperl/site/lib/URI/https.pm2
-rw-r--r--systems/texlive/tlnet/tlpkg/tlperl/site/lib/URI/ldap.pm2
-rw-r--r--systems/texlive/tlnet/tlpkg/tlperl/site/lib/URI/ldapi.pm2
-rw-r--r--systems/texlive/tlnet/tlpkg/tlperl/site/lib/URI/ldaps.pm2
-rw-r--r--systems/texlive/tlnet/tlpkg/tlperl/site/lib/URI/mailto.pm19
-rw-r--r--systems/texlive/tlnet/tlpkg/tlperl/site/lib/URI/mms.pm2
-rw-r--r--systems/texlive/tlnet/tlpkg/tlperl/site/lib/URI/news.pm2
-rw-r--r--systems/texlive/tlnet/tlpkg/tlperl/site/lib/URI/nntp.pm2
-rwxr-xr-xsystems/texlive/tlnet/tlpkg/tlperl/site/lib/URI/nntps.pm14
-rw-r--r--systems/texlive/tlnet/tlpkg/tlperl/site/lib/URI/pop.pm2
-rw-r--r--systems/texlive/tlnet/tlpkg/tlperl/site/lib/URI/rlogin.pm2
-rw-r--r--systems/texlive/tlnet/tlpkg/tlperl/site/lib/URI/rsync.pm2
-rw-r--r--systems/texlive/tlnet/tlpkg/tlperl/site/lib/URI/rtsp.pm2
-rw-r--r--systems/texlive/tlnet/tlpkg/tlperl/site/lib/URI/rtspu.pm2
-rw-r--r--systems/texlive/tlnet/tlpkg/tlperl/site/lib/URI/sftp.pm2
-rw-r--r--systems/texlive/tlnet/tlpkg/tlperl/site/lib/URI/sip.pm2
-rw-r--r--systems/texlive/tlnet/tlpkg/tlperl/site/lib/URI/sips.pm2
-rw-r--r--systems/texlive/tlnet/tlpkg/tlperl/site/lib/URI/snews.pm2
-rw-r--r--systems/texlive/tlnet/tlpkg/tlperl/site/lib/URI/ssh.pm2
-rw-r--r--systems/texlive/tlnet/tlpkg/tlperl/site/lib/URI/telnet.pm2
-rw-r--r--systems/texlive/tlnet/tlpkg/tlperl/site/lib/URI/tn3270.pm2
-rw-r--r--systems/texlive/tlnet/tlpkg/tlperl/site/lib/URI/urn.pm2
-rw-r--r--systems/texlive/tlnet/tlpkg/tlperl/site/lib/URI/urn/isbn.pm16
-rw-r--r--systems/texlive/tlnet/tlpkg/tlperl/site/lib/URI/urn/oid.pm2
53 files changed, 89 insertions, 60 deletions
diff --git a/systems/texlive/tlnet/tlpkg/tlperl/site/lib/URI/Escape.pm b/systems/texlive/tlnet/tlpkg/tlperl/site/lib/URI/Escape.pm
index 61cb6d9f30..5760bb55b0 100644
--- a/systems/texlive/tlnet/tlpkg/tlperl/site/lib/URI/Escape.pm
+++ b/systems/texlive/tlnet/tlpkg/tlperl/site/lib/URI/Escape.pm
@@ -141,7 +141,7 @@ use Exporter 5.57 'import';
our %escapes;
our @EXPORT = qw(uri_escape uri_unescape uri_escape_utf8);
our @EXPORT_OK = qw(%escapes);
-our $VERSION = '5.07';
+our $VERSION = '5.10';
use Carp ();
diff --git a/systems/texlive/tlnet/tlpkg/tlperl/site/lib/URI/Heuristic.pm b/systems/texlive/tlnet/tlpkg/tlperl/site/lib/URI/Heuristic.pm
index fc11f03c04..f2637a028b 100644
--- a/systems/texlive/tlnet/tlpkg/tlperl/site/lib/URI/Heuristic.pm
+++ b/systems/texlive/tlnet/tlpkg/tlperl/site/lib/URI/Heuristic.pm
@@ -91,7 +91,7 @@ use warnings;
use Exporter 5.57 'import';
our @EXPORT_OK = qw(uf_uri uf_uristr uf_url uf_urlstr);
-our $VERSION = '5.07';
+our $VERSION = '5.10';
our ($MY_COUNTRY, $DEBUG);
diff --git a/systems/texlive/tlnet/tlpkg/tlperl/site/lib/URI/IRI.pm b/systems/texlive/tlnet/tlpkg/tlperl/site/lib/URI/IRI.pm
index deaed8c96a..fd185a9e49 100644
--- a/systems/texlive/tlnet/tlpkg/tlperl/site/lib/URI/IRI.pm
+++ b/systems/texlive/tlnet/tlpkg/tlperl/site/lib/URI/IRI.pm
@@ -8,7 +8,7 @@ use URI ();
use overload '""' => sub { shift->as_string };
-our $VERSION = '5.07';
+our $VERSION = '5.10';
sub new {
my($class, $uri, $scheme) = @_;
diff --git a/systems/texlive/tlnet/tlpkg/tlperl/site/lib/URI/QueryParam.pm b/systems/texlive/tlnet/tlpkg/tlperl/site/lib/URI/QueryParam.pm
index 8c382bf9a4..c7ff25ed9f 100644
--- a/systems/texlive/tlnet/tlpkg/tlperl/site/lib/URI/QueryParam.pm
+++ b/systems/texlive/tlnet/tlpkg/tlperl/site/lib/URI/QueryParam.pm
@@ -3,7 +3,7 @@ package URI::QueryParam;
use strict;
use warnings;
-our $VERSION = '5.07';
+our $VERSION = '5.10';
sub URI::_query::query_param {
my $self = shift;
diff --git a/systems/texlive/tlnet/tlpkg/tlperl/site/lib/URI/Split.pm b/systems/texlive/tlnet/tlpkg/tlperl/site/lib/URI/Split.pm
index 181da6d2c4..b31d8281ce 100644
--- a/systems/texlive/tlnet/tlpkg/tlperl/site/lib/URI/Split.pm
+++ b/systems/texlive/tlnet/tlpkg/tlperl/site/lib/URI/Split.pm
@@ -3,7 +3,7 @@ package URI::Split;
use strict;
use warnings;
-our $VERSION = '5.07';
+our $VERSION = '5.10';
use Exporter 5.57 'import';
our @EXPORT_OK = qw(uri_split uri_join);
diff --git a/systems/texlive/tlnet/tlpkg/tlperl/site/lib/URI/URL.pm b/systems/texlive/tlnet/tlpkg/tlperl/site/lib/URI/URL.pm
index e8d6ae6e61..9591e9e76a 100644
--- a/systems/texlive/tlnet/tlpkg/tlperl/site/lib/URI/URL.pm
+++ b/systems/texlive/tlnet/tlpkg/tlperl/site/lib/URI/URL.pm
@@ -5,7 +5,7 @@ use warnings;
use parent 'URI::WithBase';
-our $VERSION = '5.07';
+our $VERSION = '5.10';
# Provide as much as possible of the old URI::URL interface for backwards
# compatibility...
diff --git a/systems/texlive/tlnet/tlpkg/tlperl/site/lib/URI/WithBase.pm b/systems/texlive/tlnet/tlpkg/tlperl/site/lib/URI/WithBase.pm
index a682f3d9d4..76c331b0af 100644
--- a/systems/texlive/tlnet/tlpkg/tlperl/site/lib/URI/WithBase.pm
+++ b/systems/texlive/tlnet/tlpkg/tlperl/site/lib/URI/WithBase.pm
@@ -6,7 +6,7 @@ use warnings;
use URI ();
use Scalar::Util qw(blessed);
-our $VERSION = '5.07';
+our $VERSION = '5.10';
use overload '""' => "as_string", fallback => 1;
diff --git a/systems/texlive/tlnet/tlpkg/tlperl/site/lib/URI/_foreign.pm b/systems/texlive/tlnet/tlpkg/tlperl/site/lib/URI/_foreign.pm
index c8ae6d7ec7..bc44f4a059 100644
--- a/systems/texlive/tlnet/tlpkg/tlperl/site/lib/URI/_foreign.pm
+++ b/systems/texlive/tlnet/tlpkg/tlperl/site/lib/URI/_foreign.pm
@@ -5,6 +5,6 @@ use warnings;
use parent 'URI::_generic';
-our $VERSION = '5.07';
+our $VERSION = '5.10';
1;
diff --git a/systems/texlive/tlnet/tlpkg/tlperl/site/lib/URI/_generic.pm b/systems/texlive/tlnet/tlpkg/tlperl/site/lib/URI/_generic.pm
index b7085f5af9..9ff33b2142 100644
--- a/systems/texlive/tlnet/tlpkg/tlperl/site/lib/URI/_generic.pm
+++ b/systems/texlive/tlnet/tlpkg/tlperl/site/lib/URI/_generic.pm
@@ -8,7 +8,7 @@ use parent qw(URI URI::_query);
use URI::Escape qw(uri_unescape);
use Carp ();
-our $VERSION = '5.07';
+our $VERSION = '5.10';
my $ACHAR = $URI::uric; $ACHAR =~ s,\\[/?],,g;
my $PCHAR = $URI::uric; $PCHAR =~ s,\\[?],,g;
diff --git a/systems/texlive/tlnet/tlpkg/tlperl/site/lib/URI/_idna.pm b/systems/texlive/tlnet/tlpkg/tlperl/site/lib/URI/_idna.pm
index 2b3912fa23..4292d3e982 100644
--- a/systems/texlive/tlnet/tlpkg/tlperl/site/lib/URI/_idna.pm
+++ b/systems/texlive/tlnet/tlpkg/tlperl/site/lib/URI/_idna.pm
@@ -9,7 +9,7 @@ use warnings;
use URI::_punycode qw(decode_punycode encode_punycode);
use Carp qw(croak);
-our $VERSION = '5.07';
+our $VERSION = '5.10';
BEGIN {
*URI::_idna::_ENV_::JOIN_LEAKS_UTF8_FLAGS = "$]" < 5.008_003
diff --git a/systems/texlive/tlnet/tlpkg/tlperl/site/lib/URI/_ldap.pm b/systems/texlive/tlnet/tlpkg/tlperl/site/lib/URI/_ldap.pm
index 32834a140d..43193b4c9d 100644
--- a/systems/texlive/tlnet/tlpkg/tlperl/site/lib/URI/_ldap.pm
+++ b/systems/texlive/tlnet/tlpkg/tlperl/site/lib/URI/_ldap.pm
@@ -7,7 +7,7 @@ package URI::_ldap;
use strict;
use warnings;
-our $VERSION = '5.07';
+our $VERSION = '5.10';
use URI::Escape qw(uri_unescape);
diff --git a/systems/texlive/tlnet/tlpkg/tlperl/site/lib/URI/_login.pm b/systems/texlive/tlnet/tlpkg/tlperl/site/lib/URI/_login.pm
index e44e8f0418..c3d0583ccc 100644
--- a/systems/texlive/tlnet/tlpkg/tlperl/site/lib/URI/_login.pm
+++ b/systems/texlive/tlnet/tlpkg/tlperl/site/lib/URI/_login.pm
@@ -5,7 +5,7 @@ use warnings;
use parent qw(URI::_server URI::_userpass);
-our $VERSION = '5.07';
+our $VERSION = '5.10';
# Generic terminal logins. This is used as a base class for 'telnet',
# 'tn3270', and 'rlogin' URL schemes.
diff --git a/systems/texlive/tlnet/tlpkg/tlperl/site/lib/URI/_punycode.pm b/systems/texlive/tlnet/tlpkg/tlperl/site/lib/URI/_punycode.pm
index d3af7a3321..eeb3662e1f 100644
--- a/systems/texlive/tlnet/tlpkg/tlperl/site/lib/URI/_punycode.pm
+++ b/systems/texlive/tlnet/tlpkg/tlperl/site/lib/URI/_punycode.pm
@@ -3,7 +3,7 @@ package URI::_punycode;
use strict;
use warnings;
-our $VERSION = '5.07';
+our $VERSION = '5.10';
use Exporter 'import';
our @EXPORT = qw(encode_punycode decode_punycode);
diff --git a/systems/texlive/tlnet/tlpkg/tlperl/site/lib/URI/_query.pm b/systems/texlive/tlnet/tlpkg/tlperl/site/lib/URI/_query.pm
index 690f844406..b9b70c491d 100644
--- a/systems/texlive/tlnet/tlpkg/tlperl/site/lib/URI/_query.pm
+++ b/systems/texlive/tlnet/tlpkg/tlperl/site/lib/URI/_query.pm
@@ -6,7 +6,7 @@ use warnings;
use URI ();
use URI::Escape qw(uri_unescape);
-our $VERSION = '5.07';
+our $VERSION = '5.10';
sub query
{
diff --git a/systems/texlive/tlnet/tlpkg/tlperl/site/lib/URI/_segment.pm b/systems/texlive/tlnet/tlpkg/tlperl/site/lib/URI/_segment.pm
index ca8088ed0f..364ca4857d 100644
--- a/systems/texlive/tlnet/tlpkg/tlperl/site/lib/URI/_segment.pm
+++ b/systems/texlive/tlnet/tlpkg/tlperl/site/lib/URI/_segment.pm
@@ -11,7 +11,7 @@ use URI::Escape qw(uri_unescape);
use overload '""' => sub { $_[0]->[0] },
fallback => 1;
-our $VERSION = '5.07';
+our $VERSION = '5.10';
sub new
{
diff --git a/systems/texlive/tlnet/tlpkg/tlperl/site/lib/URI/_server.pm b/systems/texlive/tlnet/tlpkg/tlperl/site/lib/URI/_server.pm
index b44b988336..fec55a4fe0 100644
--- a/systems/texlive/tlnet/tlpkg/tlperl/site/lib/URI/_server.pm
+++ b/systems/texlive/tlnet/tlpkg/tlperl/site/lib/URI/_server.pm
@@ -7,7 +7,7 @@ use parent 'URI::_generic';
use URI::Escape qw(uri_unescape);
-our $VERSION = '5.07';
+our $VERSION = '5.10';
sub _uric_escape {
my($class, $str) = @_;
diff --git a/systems/texlive/tlnet/tlpkg/tlperl/site/lib/URI/_userpass.pm b/systems/texlive/tlnet/tlpkg/tlperl/site/lib/URI/_userpass.pm
index 5553a0be4b..acf571783a 100644
--- a/systems/texlive/tlnet/tlpkg/tlperl/site/lib/URI/_userpass.pm
+++ b/systems/texlive/tlnet/tlpkg/tlperl/site/lib/URI/_userpass.pm
@@ -5,7 +5,7 @@ use warnings;
use URI::Escape qw(uri_unescape);
-our $VERSION = '5.07';
+our $VERSION = '5.10';
sub user
{
diff --git a/systems/texlive/tlnet/tlpkg/tlperl/site/lib/URI/data.pm b/systems/texlive/tlnet/tlpkg/tlperl/site/lib/URI/data.pm
index ade96d80cd..666ef38afb 100644
--- a/systems/texlive/tlnet/tlpkg/tlperl/site/lib/URI/data.pm
+++ b/systems/texlive/tlnet/tlpkg/tlperl/site/lib/URI/data.pm
@@ -5,7 +5,7 @@ use warnings;
use parent 'URI';
-our $VERSION = '5.07';
+our $VERSION = '5.10';
use MIME::Base64 qw(decode_base64 encode_base64);
use URI::Escape qw(uri_unescape);
diff --git a/systems/texlive/tlnet/tlpkg/tlperl/site/lib/URI/file.pm b/systems/texlive/tlnet/tlpkg/tlperl/site/lib/URI/file.pm
index 0d07a2d1e9..c9973ecce9 100644
--- a/systems/texlive/tlnet/tlpkg/tlperl/site/lib/URI/file.pm
+++ b/systems/texlive/tlnet/tlpkg/tlperl/site/lib/URI/file.pm
@@ -4,7 +4,7 @@ use strict;
use warnings;
use parent 'URI::_generic';
-our $VERSION = '5.07';
+our $VERSION = '5.10';
use URI::Escape qw(uri_unescape);
diff --git a/systems/texlive/tlnet/tlpkg/tlperl/site/lib/URI/file/Base.pm b/systems/texlive/tlnet/tlpkg/tlperl/site/lib/URI/file/Base.pm
index 4926df773a..5192f33a14 100644
--- a/systems/texlive/tlnet/tlpkg/tlperl/site/lib/URI/file/Base.pm
+++ b/systems/texlive/tlnet/tlpkg/tlperl/site/lib/URI/file/Base.pm
@@ -5,7 +5,7 @@ use warnings;
use URI::Escape ();
-our $VERSION = '5.07';
+our $VERSION = '5.10';
sub new
{
diff --git a/systems/texlive/tlnet/tlpkg/tlperl/site/lib/URI/file/FAT.pm b/systems/texlive/tlnet/tlpkg/tlperl/site/lib/URI/file/FAT.pm
index 5d8fe87263..521c3a05a4 100644
--- a/systems/texlive/tlnet/tlpkg/tlperl/site/lib/URI/file/FAT.pm
+++ b/systems/texlive/tlnet/tlpkg/tlperl/site/lib/URI/file/FAT.pm
@@ -5,7 +5,7 @@ use warnings;
use parent 'URI::file::Win32';
-our $VERSION = '5.07';
+our $VERSION = '5.10';
sub fix_path
{
diff --git a/systems/texlive/tlnet/tlpkg/tlperl/site/lib/URI/file/Mac.pm b/systems/texlive/tlnet/tlpkg/tlperl/site/lib/URI/file/Mac.pm
index ca192ec6d7..ee7bf57877 100644
--- a/systems/texlive/tlnet/tlpkg/tlperl/site/lib/URI/file/Mac.pm
+++ b/systems/texlive/tlnet/tlpkg/tlperl/site/lib/URI/file/Mac.pm
@@ -7,7 +7,7 @@ use parent 'URI::file::Base';
use URI::Escape qw(uri_unescape);
-our $VERSION = '5.07';
+our $VERSION = '5.10';
sub _file_extract_path
{
diff --git a/systems/texlive/tlnet/tlpkg/tlperl/site/lib/URI/file/OS2.pm b/systems/texlive/tlnet/tlpkg/tlperl/site/lib/URI/file/OS2.pm
index 38b0106d56..14ec91570b 100644
--- a/systems/texlive/tlnet/tlpkg/tlperl/site/lib/URI/file/OS2.pm
+++ b/systems/texlive/tlnet/tlpkg/tlperl/site/lib/URI/file/OS2.pm
@@ -5,7 +5,7 @@ use warnings;
use parent 'URI::file::Win32';
-our $VERSION = '5.07';
+our $VERSION = '5.10';
# The Win32 version translates k:/foo to file://k:/foo (?!)
# We add an empty host
diff --git a/systems/texlive/tlnet/tlpkg/tlperl/site/lib/URI/file/QNX.pm b/systems/texlive/tlnet/tlpkg/tlperl/site/lib/URI/file/QNX.pm
index c9893cbf0f..cb47809898 100644
--- a/systems/texlive/tlnet/tlpkg/tlperl/site/lib/URI/file/QNX.pm
+++ b/systems/texlive/tlnet/tlpkg/tlperl/site/lib/URI/file/QNX.pm
@@ -5,7 +5,7 @@ use warnings;
use parent 'URI::file::Unix';
-our $VERSION = '5.07';
+our $VERSION = '5.10';
sub _file_extract_path
{
diff --git a/systems/texlive/tlnet/tlpkg/tlperl/site/lib/URI/file/Unix.pm b/systems/texlive/tlnet/tlpkg/tlperl/site/lib/URI/file/Unix.pm
index 08dee07d48..fa226f7765 100644
--- a/systems/texlive/tlnet/tlpkg/tlperl/site/lib/URI/file/Unix.pm
+++ b/systems/texlive/tlnet/tlpkg/tlperl/site/lib/URI/file/Unix.pm
@@ -7,7 +7,7 @@ use parent 'URI::file::Base';
use URI::Escape qw(uri_unescape);
-our $VERSION = '5.07';
+our $VERSION = '5.10';
sub _file_extract_path
{
diff --git a/systems/texlive/tlnet/tlpkg/tlperl/site/lib/URI/file/Win32.pm b/systems/texlive/tlnet/tlpkg/tlperl/site/lib/URI/file/Win32.pm
index fd51dd481f..bc1b373b4e 100644
--- a/systems/texlive/tlnet/tlpkg/tlperl/site/lib/URI/file/Win32.pm
+++ b/systems/texlive/tlnet/tlpkg/tlperl/site/lib/URI/file/Win32.pm
@@ -7,7 +7,7 @@ use parent 'URI::file::Base';
use URI::Escape qw(uri_unescape);
-our $VERSION = '5.07';
+our $VERSION = '5.10';
sub _file_extract_authority
{
diff --git a/systems/texlive/tlnet/tlpkg/tlperl/site/lib/URI/ftp.pm b/systems/texlive/tlnet/tlpkg/tlperl/site/lib/URI/ftp.pm
index 15d068c81d..a6c12df271 100644
--- a/systems/texlive/tlnet/tlpkg/tlperl/site/lib/URI/ftp.pm
+++ b/systems/texlive/tlnet/tlpkg/tlperl/site/lib/URI/ftp.pm
@@ -3,7 +3,7 @@ package URI::ftp;
use strict;
use warnings;
-our $VERSION = '5.07';
+our $VERSION = '5.10';
use parent qw(URI::_server URI::_userpass);
diff --git a/systems/texlive/tlnet/tlpkg/tlperl/site/lib/URI/gopher.pm b/systems/texlive/tlnet/tlpkg/tlperl/site/lib/URI/gopher.pm
index e251164a00..febd95c0ba 100644
--- a/systems/texlive/tlnet/tlpkg/tlperl/site/lib/URI/gopher.pm
+++ b/systems/texlive/tlnet/tlpkg/tlperl/site/lib/URI/gopher.pm
@@ -3,7 +3,7 @@ package URI::gopher; # <draft-murali-url-gopher>, Dec 4, 1996
use strict;
use warnings;
-our $VERSION = '5.07';
+our $VERSION = '5.10';
use parent 'URI::_server';
diff --git a/systems/texlive/tlnet/tlpkg/tlperl/site/lib/URI/http.pm b/systems/texlive/tlnet/tlpkg/tlperl/site/lib/URI/http.pm
index b99edcc909..50a09f0989 100644
--- a/systems/texlive/tlnet/tlpkg/tlperl/site/lib/URI/http.pm
+++ b/systems/texlive/tlnet/tlpkg/tlperl/site/lib/URI/http.pm
@@ -3,7 +3,7 @@ package URI::http;
use strict;
use warnings;
-our $VERSION = '5.07';
+our $VERSION = '5.10';
use parent 'URI::_server';
diff --git a/systems/texlive/tlnet/tlpkg/tlperl/site/lib/URI/https.pm b/systems/texlive/tlnet/tlpkg/tlperl/site/lib/URI/https.pm
index a4ec77ecbc..e3283e57c0 100644
--- a/systems/texlive/tlnet/tlpkg/tlperl/site/lib/URI/https.pm
+++ b/systems/texlive/tlnet/tlpkg/tlperl/site/lib/URI/https.pm
@@ -3,7 +3,7 @@ package URI::https;
use strict;
use warnings;
-our $VERSION = '5.07';
+our $VERSION = '5.10';
use parent 'URI::http';
diff --git a/systems/texlive/tlnet/tlpkg/tlperl/site/lib/URI/ldap.pm b/systems/texlive/tlnet/tlpkg/tlperl/site/lib/URI/ldap.pm
index ea503a3337..2977954b5a 100644
--- a/systems/texlive/tlnet/tlpkg/tlperl/site/lib/URI/ldap.pm
+++ b/systems/texlive/tlnet/tlpkg/tlperl/site/lib/URI/ldap.pm
@@ -7,7 +7,7 @@ package URI::ldap;
use strict;
use warnings;
-our $VERSION = '5.07';
+our $VERSION = '5.10';
use parent qw(URI::_ldap URI::_server);
diff --git a/systems/texlive/tlnet/tlpkg/tlperl/site/lib/URI/ldapi.pm b/systems/texlive/tlnet/tlpkg/tlperl/site/lib/URI/ldapi.pm
index d648e1bc08..e3bac5a860 100644
--- a/systems/texlive/tlnet/tlpkg/tlperl/site/lib/URI/ldapi.pm
+++ b/systems/texlive/tlnet/tlpkg/tlperl/site/lib/URI/ldapi.pm
@@ -3,7 +3,7 @@ package URI::ldapi;
use strict;
use warnings;
-our $VERSION = '5.07';
+our $VERSION = '5.10';
use parent qw(URI::_ldap URI::_generic);
diff --git a/systems/texlive/tlnet/tlpkg/tlperl/site/lib/URI/ldaps.pm b/systems/texlive/tlnet/tlpkg/tlperl/site/lib/URI/ldaps.pm
index 3270f3f8ff..4d58c67e38 100644
--- a/systems/texlive/tlnet/tlpkg/tlperl/site/lib/URI/ldaps.pm
+++ b/systems/texlive/tlnet/tlpkg/tlperl/site/lib/URI/ldaps.pm
@@ -3,7 +3,7 @@ package URI::ldaps;
use strict;
use warnings;
-our $VERSION = '5.07';
+our $VERSION = '5.10';
use parent 'URI::ldap';
diff --git a/systems/texlive/tlnet/tlpkg/tlperl/site/lib/URI/mailto.pm b/systems/texlive/tlnet/tlpkg/tlperl/site/lib/URI/mailto.pm
index 2ed4275706..5d6f241080 100644
--- a/systems/texlive/tlnet/tlpkg/tlperl/site/lib/URI/mailto.pm
+++ b/systems/texlive/tlnet/tlpkg/tlperl/site/lib/URI/mailto.pm
@@ -3,7 +3,7 @@ package URI::mailto; # RFC 2368
use strict;
use warnings;
-our $VERSION = '5.07';
+our $VERSION = '5.10';
use parent qw(URI URI::_query);
@@ -38,7 +38,7 @@ sub to
}
-sub headers
+sub headers
{
my $self = shift;
@@ -70,4 +70,19 @@ sub headers
URI->new("mailto:?$opaque")->query_form;
}
+# https://datatracker.ietf.org/doc/html/rfc6068#section-5 requires
+# plus signs (+) not to be turned into spaces
+sub query_form
+{
+ my $self = shift;
+ my @fields = $self->SUPER::query_form(@_);
+ for ( my $i = 0 ; $i < @fields ; $i += 2 ) {
+ if ( $fields[0] eq 'to' ) {
+ $fields[1] =~ s/ /+/g;
+ last;
+ }
+ }
+ return @fields;
+}
+
1;
diff --git a/systems/texlive/tlnet/tlpkg/tlperl/site/lib/URI/mms.pm b/systems/texlive/tlnet/tlpkg/tlperl/site/lib/URI/mms.pm
index 66b11406cc..6a41297484 100644
--- a/systems/texlive/tlnet/tlpkg/tlperl/site/lib/URI/mms.pm
+++ b/systems/texlive/tlnet/tlpkg/tlperl/site/lib/URI/mms.pm
@@ -3,7 +3,7 @@ package URI::mms;
use strict;
use warnings;
-our $VERSION = '5.07';
+our $VERSION = '5.10';
use parent 'URI::http';
diff --git a/systems/texlive/tlnet/tlpkg/tlperl/site/lib/URI/news.pm b/systems/texlive/tlnet/tlpkg/tlperl/site/lib/URI/news.pm
index fab598c2ee..4092981be0 100644
--- a/systems/texlive/tlnet/tlpkg/tlperl/site/lib/URI/news.pm
+++ b/systems/texlive/tlnet/tlpkg/tlperl/site/lib/URI/news.pm
@@ -3,7 +3,7 @@ package URI::news; # draft-gilman-news-url-01
use strict;
use warnings;
-our $VERSION = '5.07';
+our $VERSION = '5.10';
use parent 'URI::_server';
diff --git a/systems/texlive/tlnet/tlpkg/tlperl/site/lib/URI/nntp.pm b/systems/texlive/tlnet/tlpkg/tlperl/site/lib/URI/nntp.pm
index 3676deb975..be276893d0 100644
--- a/systems/texlive/tlnet/tlpkg/tlperl/site/lib/URI/nntp.pm
+++ b/systems/texlive/tlnet/tlpkg/tlperl/site/lib/URI/nntp.pm
@@ -3,7 +3,7 @@ package URI::nntp; # draft-gilman-news-url-01
use strict;
use warnings;
-our $VERSION = '5.07';
+our $VERSION = '5.10';
use parent 'URI::news';
diff --git a/systems/texlive/tlnet/tlpkg/tlperl/site/lib/URI/nntps.pm b/systems/texlive/tlnet/tlpkg/tlperl/site/lib/URI/nntps.pm
new file mode 100755
index 0000000000..a10e99293a
--- /dev/null
+++ b/systems/texlive/tlnet/tlpkg/tlperl/site/lib/URI/nntps.pm
@@ -0,0 +1,14 @@
+package URI::nntps;
+
+use strict;
+use warnings;
+
+our $VERSION = '5.10';
+
+use parent 'URI::nntp';
+
+sub default_port { 563 }
+
+sub secure { 1 }
+
+1;
diff --git a/systems/texlive/tlnet/tlpkg/tlperl/site/lib/URI/pop.pm b/systems/texlive/tlnet/tlpkg/tlperl/site/lib/URI/pop.pm
index 017f699ca7..accab911b4 100644
--- a/systems/texlive/tlnet/tlpkg/tlperl/site/lib/URI/pop.pm
+++ b/systems/texlive/tlnet/tlpkg/tlperl/site/lib/URI/pop.pm
@@ -3,7 +3,7 @@ package URI::pop; # RFC 2384
use strict;
use warnings;
-our $VERSION = '5.07';
+our $VERSION = '5.10';
use parent 'URI::_server';
diff --git a/systems/texlive/tlnet/tlpkg/tlperl/site/lib/URI/rlogin.pm b/systems/texlive/tlnet/tlpkg/tlperl/site/lib/URI/rlogin.pm
index c4c37b63dc..049ff4a026 100644
--- a/systems/texlive/tlnet/tlpkg/tlperl/site/lib/URI/rlogin.pm
+++ b/systems/texlive/tlnet/tlpkg/tlperl/site/lib/URI/rlogin.pm
@@ -3,7 +3,7 @@ package URI::rlogin;
use strict;
use warnings;
-our $VERSION = '5.07';
+our $VERSION = '5.10';
use parent 'URI::_login';
diff --git a/systems/texlive/tlnet/tlpkg/tlperl/site/lib/URI/rsync.pm b/systems/texlive/tlnet/tlpkg/tlperl/site/lib/URI/rsync.pm
index cf978d18b1..164c6b7d55 100644
--- a/systems/texlive/tlnet/tlpkg/tlperl/site/lib/URI/rsync.pm
+++ b/systems/texlive/tlnet/tlpkg/tlperl/site/lib/URI/rsync.pm
@@ -5,7 +5,7 @@ package URI::rsync; # http://rsync.samba.org/
use strict;
use warnings;
-our $VERSION = '5.07';
+our $VERSION = '5.10';
use parent qw(URI::_server URI::_userpass);
diff --git a/systems/texlive/tlnet/tlpkg/tlperl/site/lib/URI/rtsp.pm b/systems/texlive/tlnet/tlpkg/tlperl/site/lib/URI/rtsp.pm
index 0c056a8552..48429f7e1a 100644
--- a/systems/texlive/tlnet/tlpkg/tlperl/site/lib/URI/rtsp.pm
+++ b/systems/texlive/tlnet/tlpkg/tlperl/site/lib/URI/rtsp.pm
@@ -3,7 +3,7 @@ package URI::rtsp;
use strict;
use warnings;
-our $VERSION = '5.07';
+our $VERSION = '5.10';
use parent 'URI::http';
diff --git a/systems/texlive/tlnet/tlpkg/tlperl/site/lib/URI/rtspu.pm b/systems/texlive/tlnet/tlpkg/tlperl/site/lib/URI/rtspu.pm
index b70be28b49..c9bc64d49d 100644
--- a/systems/texlive/tlnet/tlpkg/tlperl/site/lib/URI/rtspu.pm
+++ b/systems/texlive/tlnet/tlpkg/tlperl/site/lib/URI/rtspu.pm
@@ -3,7 +3,7 @@ package URI::rtspu;
use strict;
use warnings;
-our $VERSION = '5.07';
+our $VERSION = '5.10';
use parent 'URI::rtsp';
diff --git a/systems/texlive/tlnet/tlpkg/tlperl/site/lib/URI/sftp.pm b/systems/texlive/tlnet/tlpkg/tlperl/site/lib/URI/sftp.pm
index b1636f0901..4c9a1f38bf 100644
--- a/systems/texlive/tlnet/tlpkg/tlperl/site/lib/URI/sftp.pm
+++ b/systems/texlive/tlnet/tlpkg/tlperl/site/lib/URI/sftp.pm
@@ -5,6 +5,6 @@ use warnings;
use parent 'URI::ssh';
-our $VERSION = '5.07';
+our $VERSION = '5.10';
1;
diff --git a/systems/texlive/tlnet/tlpkg/tlperl/site/lib/URI/sip.pm b/systems/texlive/tlnet/tlpkg/tlperl/site/lib/URI/sip.pm
index 4e13644cb7..a6aeb858ac 100644
--- a/systems/texlive/tlnet/tlpkg/tlperl/site/lib/URI/sip.pm
+++ b/systems/texlive/tlnet/tlpkg/tlperl/site/lib/URI/sip.pm
@@ -14,7 +14,7 @@ use parent qw(URI::_server URI::_userpass);
use URI::Escape ();
-our $VERSION = '5.07';
+our $VERSION = '5.10';
sub default_port { 5060 }
diff --git a/systems/texlive/tlnet/tlpkg/tlperl/site/lib/URI/sips.pm b/systems/texlive/tlnet/tlpkg/tlperl/site/lib/URI/sips.pm
index 7e8e0ff17c..3d7c2f2d6a 100644
--- a/systems/texlive/tlnet/tlpkg/tlperl/site/lib/URI/sips.pm
+++ b/systems/texlive/tlnet/tlpkg/tlperl/site/lib/URI/sips.pm
@@ -3,7 +3,7 @@ package URI::sips;
use strict;
use warnings;
-our $VERSION = '5.07';
+our $VERSION = '5.10';
use parent 'URI::sip';
diff --git a/systems/texlive/tlnet/tlpkg/tlperl/site/lib/URI/snews.pm b/systems/texlive/tlnet/tlpkg/tlperl/site/lib/URI/snews.pm
index 52d3e4fdcf..e541482125 100644
--- a/systems/texlive/tlnet/tlpkg/tlperl/site/lib/URI/snews.pm
+++ b/systems/texlive/tlnet/tlpkg/tlperl/site/lib/URI/snews.pm
@@ -3,7 +3,7 @@ package URI::snews; # draft-gilman-news-url-01
use strict;
use warnings;
-our $VERSION = '5.07';
+our $VERSION = '5.10';
use parent 'URI::news';
diff --git a/systems/texlive/tlnet/tlpkg/tlperl/site/lib/URI/ssh.pm b/systems/texlive/tlnet/tlpkg/tlperl/site/lib/URI/ssh.pm
index 53ddfee25e..7273c2b1a5 100644
--- a/systems/texlive/tlnet/tlpkg/tlperl/site/lib/URI/ssh.pm
+++ b/systems/texlive/tlnet/tlpkg/tlperl/site/lib/URI/ssh.pm
@@ -3,7 +3,7 @@ package URI::ssh;
use strict;
use warnings;
-our $VERSION = '5.07';
+our $VERSION = '5.10';
use parent 'URI::_login';
diff --git a/systems/texlive/tlnet/tlpkg/tlperl/site/lib/URI/telnet.pm b/systems/texlive/tlnet/tlpkg/tlperl/site/lib/URI/telnet.pm
index 72eca504a3..5d81650607 100644
--- a/systems/texlive/tlnet/tlpkg/tlperl/site/lib/URI/telnet.pm
+++ b/systems/texlive/tlnet/tlpkg/tlperl/site/lib/URI/telnet.pm
@@ -3,7 +3,7 @@ package URI::telnet;
use strict;
use warnings;
-our $VERSION = '5.07';
+our $VERSION = '5.10';
use parent 'URI::_login';
diff --git a/systems/texlive/tlnet/tlpkg/tlperl/site/lib/URI/tn3270.pm b/systems/texlive/tlnet/tlpkg/tlperl/site/lib/URI/tn3270.pm
index 9be1c82998..53a341402e 100644
--- a/systems/texlive/tlnet/tlpkg/tlperl/site/lib/URI/tn3270.pm
+++ b/systems/texlive/tlnet/tlpkg/tlperl/site/lib/URI/tn3270.pm
@@ -3,7 +3,7 @@ package URI::tn3270;
use strict;
use warnings;
-our $VERSION = '5.07';
+our $VERSION = '5.10';
use parent 'URI::_login';
diff --git a/systems/texlive/tlnet/tlpkg/tlperl/site/lib/URI/urn.pm b/systems/texlive/tlnet/tlpkg/tlperl/site/lib/URI/urn.pm
index 83c9dfcbda..75f3a9b646 100644
--- a/systems/texlive/tlnet/tlpkg/tlperl/site/lib/URI/urn.pm
+++ b/systems/texlive/tlnet/tlpkg/tlperl/site/lib/URI/urn.pm
@@ -3,7 +3,7 @@ package URI::urn; # RFC 2141
use strict;
use warnings;
-our $VERSION = '5.07';
+our $VERSION = '5.10';
use parent 'URI';
diff --git a/systems/texlive/tlnet/tlpkg/tlperl/site/lib/URI/urn/isbn.pm b/systems/texlive/tlnet/tlpkg/tlperl/site/lib/URI/urn/isbn.pm
index 945eba5b19..4986d701f6 100644
--- a/systems/texlive/tlnet/tlpkg/tlperl/site/lib/URI/urn/isbn.pm
+++ b/systems/texlive/tlnet/tlpkg/tlperl/site/lib/URI/urn/isbn.pm
@@ -3,7 +3,7 @@ package URI::urn::isbn; # RFC 3187
use strict;
use warnings;
-our $VERSION = '5.07';
+our $VERSION = '5.10';
use parent 'URI::urn';
@@ -11,13 +11,13 @@ use Carp qw(carp);
BEGIN {
require Business::ISBN;
-
+
local $^W = 0; # don't warn about dev versions, perl5.004 style
- warn "Using Business::ISBN version " . Business::ISBN->VERSION .
- " which is deprecated.\nUpgrade to Business::ISBN version 2\n"
- if Business::ISBN->VERSION < 2;
+ warn "Using Business::ISBN version " . Business::ISBN->VERSION .
+ " which is deprecated.\nUpgrade to Business::ISBN version 3.005\n"
+ if Business::ISBN->VERSION < 3.005;
}
-
+
sub _isbn {
my $nss = shift;
$nss = $nss->nss if ref($nss);
@@ -61,7 +61,7 @@ sub isbn_group_code {
sub isbn_country_code {
my $name = (caller(0))[3]; $name =~ s/.*:://;
carp "$name is DEPRECATED. Use isbn_group_code instead";
-
+
no strict 'refs';
&isbn_group_code;
}
@@ -74,7 +74,7 @@ my $isbn13_method = do {
sub isbn13 {
my $isbn = shift->_isbn || return undef;
-
+
# Business::ISBN 1.x didn't put hyphens in the EAN, and it was just a string
# Business::ISBN 2.0 doesn't do EAN, but it does ISBN-13 objects
# and it uses the hyphens, so call as_string with an empty anon array
diff --git a/systems/texlive/tlnet/tlpkg/tlperl/site/lib/URI/urn/oid.pm b/systems/texlive/tlnet/tlpkg/tlperl/site/lib/URI/urn/oid.pm
index 040b5ca9ce..5ba279f68c 100644
--- a/systems/texlive/tlnet/tlpkg/tlperl/site/lib/URI/urn/oid.pm
+++ b/systems/texlive/tlnet/tlpkg/tlperl/site/lib/URI/urn/oid.pm
@@ -3,7 +3,7 @@ package URI::urn::oid; # RFC 2061
use strict;
use warnings;
-our $VERSION = '5.07';
+our $VERSION = '5.10';
use parent 'URI::urn';