diff options
author | Yorhel <git@yorhel.nl> | 2008-11-01 19:46:57 +0100 |
---|---|---|
committer | Yorhel <git@yorhel.nl> | 2008-11-01 19:46:57 +0100 |
commit | 578eed9073a8e9c8ac983ff3f002603f932a4a96 (patch) | |
tree | 6fbf4a3285c2a7f46287e4a5e64160d13d180518 | |
parent | 34caab640eb23b5f6e764c3e4f906fa497796447 (diff) |
Made CGI::Cookie::XS optional
-rw-r--r-- | README | 2 | ||||
-rw-r--r-- | lib/YAWF/Request.pm | 2 |
2 files changed, 2 insertions, 2 deletions
@@ -16,12 +16,12 @@ YAWF - Yet Another Website Framework [or] Yorhel's Awesome Website Framework Required DBI CGI::Minimal - CGI::Cookie::XS Optional FCGI to run in a FastCGI environment Time::HiRes with debugging enabled PerlIO::gzip output compression + CGI::Cookie::XS to parse HTTP cookies Notes on usage diff --git a/lib/YAWF/Request.pm b/lib/YAWF/Request.pm index d3e314d..dd14a89 100644 --- a/lib/YAWF/Request.pm +++ b/lib/YAWF/Request.pm @@ -5,7 +5,6 @@ use strict; use warnings; use Encode 'decode_utf8'; use Exporter 'import'; -use CGI::Cookie::XS; use CGI::Minimal; our @EXPORT = qw| @@ -75,6 +74,7 @@ sub reqSaveUpload { sub reqCookie { + require CGI::Cookie::XS; my $c = CGI::Cookie::XS->fetch; return $c && ref($c) eq 'HASH' && $c->{$_[1]} ? decode_utf8 $c->{$_[1]}[0] : ''; } |