diff Lib/Engine/Security/Cookies.pm @ 49:16ada169ca75

migrating to the Eclipse IDE
author wizard@linux-odin.local
date Fri, 26 Feb 2010 10:49:21 +0300
parents 03e58a454b20
children
line wrap: on
line diff
--- a/Lib/Engine/Security/Cookies.pm	Fri Feb 26 01:43:42 2010 +0300
+++ b/Lib/Engine/Security/Cookies.pm	Fri Feb 26 10:49:21 2010 +0300
@@ -1,27 +1,27 @@
-use strict;
-package Engine::Security::Cookies;
-use Engine::CGI;
-use CGI::Cookie;
-
-sub ReadSecData {
-    
-    return Engine::CGI::Query->cookie('SecData');
-}
-
-sub WriteSecData {
-    my ($class,$data) = @_;
-    
-    Engine::CGI::Query->SetCookies(new CGI::Cookie(-name => 'SecData', -value => $data, -expires => '+1d'));
-}
-
-sub ReadSSID {
-    return Engine::CGI::Query->cookie('SSID');
-}
-
-sub WriteSSID {
-    my ($class,$data) = @_;
-    
-    Engine::CGI::Query->SetCookies(new CGI::Cookie(-name => 'SSID', -value => $data, -expires => '+1d'));
-}
-
-1;
\ No newline at end of file
+use strict;
+package Engine::Security::Cookies;
+use Engine::CGI;
+use CGI::Cookie;
+
+sub ReadSecData {
+    
+    return Engine::CGI::Query->cookie('SecData');
+}
+
+sub WriteSecData {
+    my ($class,$data) = @_;
+    
+    Engine::CGI::Query->SetCookies(new CGI::Cookie(-name => 'SecData', -value => $data, -expires => '+1d'));
+}
+
+sub ReadSSID {
+    return Engine::CGI::Query->cookie('SSID');
+}
+
+sub WriteSSID {
+    my ($class,$data) = @_;
+    
+    Engine::CGI::Query->SetCookies(new CGI::Cookie(-name => 'SSID', -value => $data, -expires => '+1d'));
+}
+
+1;