diff options
author | Olaf Alders <olaf@wundersolutions.com> | 2021-01-12 23:09:21 -0500 |
---|---|---|
committer | Olaf Alders <olaf@wundersolutions.com> | 2021-01-13 09:40:02 -0500 |
commit | 4ae14b130afa39ca9d395d34b0a758f6d4af43cd (patch) | |
tree | 0ddd33697ddd16b01d152c349f3d8977db5dbd9b /t/escape.t | |
parent | 091356cf1474689b0fad9363799f6a60621cdb96 (diff) | |
download | uri-4ae14b130afa39ca9d395d34b0a758f6d4af43cd.tar.gz |
Tidy import statementsoalder/tidy-imports
Diffstat (limited to 't/escape.t')
-rw-r--r-- | t/escape.t | 8 |
1 files changed, 1 insertions, 7 deletions
@@ -3,7 +3,7 @@ use warnings; use Test::More tests => 12; -use URI::Escape; +use URI::Escape qw(%escapes uri_escape uri_escape_utf8 uri_unescape); is uri_escape("|abcå"), "%7Cabc%E5"; @@ -19,14 +19,8 @@ is uri_unescape("%7Cabc%e5"), "|abcå"; is_deeply [uri_unescape("%40A%42", "CDE", "F%47H")], [qw(@AB CDE FGH)]; - -use URI::Escape qw(%escapes); - is $escapes{"%"}, "%25"; - -use URI::Escape qw(uri_escape_utf8); - is uri_escape_utf8("|abcå"), "%7Cabc%C3%A5"; skip "Perl 5.8.0 or higher required", 3 if $] < 5.008; |