From 3282be229999dc36c197b264d63063a18d136331 Mon Sep 17 00:00:00 2001 From: Andreas Brachold Date: Sun, 11 Nov 2007 06:55:13 +0000 Subject: * Update installation list with required modules * Remove unused/doubled provided external perl moduls --- lib/URI/_segment.pm | 20 -------------------- 1 file changed, 20 deletions(-) delete mode 100644 lib/URI/_segment.pm (limited to 'lib/URI/_segment.pm') diff --git a/lib/URI/_segment.pm b/lib/URI/_segment.pm deleted file mode 100644 index c91b696..0000000 --- a/lib/URI/_segment.pm +++ /dev/null @@ -1,20 +0,0 @@ -package URI::_segment; - -# Represents a generic path_segment so that it can be treated as -# a string too. - -use strict; -use URI::Escape qw(uri_unescape); - -use overload '""' => sub { $_[0]->[0] }, - fallback => 1; - -sub new -{ - my $class = shift; - my @segment = split(';', shift, -1); - $segment[0] = uri_unescape($segment[0]); - bless \@segment, $class; -} - -1; -- cgit v1.2.3