✏️ 编辑:_segment.pm
路径:
/usr/share/perl5/URI/_segment.pm
大小:416 B · 修改:2021-03-03 15:16:52 · 权限:0644 · 只读(保存会失败)
← 返回目录
👁 查看
⬇ 下载
package URI::_segment; # Represents a generic path_segment so that it can be treated as # a string too. use strict; use warnings; use URI::Escape qw(uri_unescape); use overload '""' => sub { $_[0]->[0] }, fallback => 1; our $VERSION = '5.09'; sub new { my $class = shift; my @segment = split(';', shift, -1); $segment[0] = uri_unescape($segment[0]); bless \@segment, $class; } 1;
💾 保存
取消
保存为 UTF-8,换行统一为 LF