diff options
Diffstat (limited to 'lib/Types')
-rw-r--r-- | lib/Types/DateTime.pm | 20 | ||||
-rw-r--r-- | lib/Types/URI.pm | 15 |
2 files changed, 0 insertions, 35 deletions
diff --git a/lib/Types/DateTime.pm b/lib/Types/DateTime.pm deleted file mode 100644 index d13f0d5..0000000 --- a/lib/Types/DateTime.pm +++ /dev/null @@ -1,20 +0,0 @@ -package Types::DateTime; -use strict; -use warnings; -use namespace::autoclean; -use Type::Library -base, -declare => 'DateTimeT'; -use Type::Utils -all; -use Types::Standard -types; - -class_type DateTimeT, { class => 'DateTime' }; -coerce DateTimeT, from Num, via { - require DateTime; - DateTime->from_epoch(epoch => $_ ); -}; -coerce DateTimeT, from Str, via { - require DateTime::Format::ISO8601; - s{([+-])(\d\d)(\d\d)\z}{$1$2:$3}; - DateTime::Format::ISO8601->new->parse_datetime($_) -}; - -1; diff --git a/lib/Types/URI.pm b/lib/Types/URI.pm deleted file mode 100644 index 0bb4ae5..0000000 --- a/lib/Types/URI.pm +++ /dev/null @@ -1,15 +0,0 @@ -package Types::URI; -use strict; -use warnings; -use namespace::autoclean; -use Type::Library -base, -declare => 'Uri'; -use Type::Utils -all; -use Types::Standard -types; - -class_type Uri, { class => 'URI' }; -coerce Uri, from Str, via { - require URI; - URI->new($_); -}; - -1; |