comparison Lib/IMPL/Security/Auth.pm @ 51:a1498298d3ee

Security in progress
author wizard@linux-odin.local
date Mon, 01 Mar 2010 17:25:36 +0300 (2010-03-01)
parents
children 15d720913562
comparison
equal deleted inserted replaced
50:521c9c1a3ea1 51:a1498298d3ee
1 package IMPL::Security::Auth;
2
3 use constant {
4 SUCCESS => 1,
5 INCOMPLETE => 2,
6 FAIL => 3
7 };
8
9 use base qw(Exporter);
10
11 our @EXPORT_OK = qw(&SUCCESS &INCOMPLETE &FAI);
12 our %EXPORT_TAGS = (Const => [qw(&SUCCESS &INCOMPLETE &FAI)]);
13
14 1;
15
16 __END__
17
18 =pod
19
20 =head1 DESCRIPTION
21
22 �������� ������ ��� ����������� �������������.
23
24 ������� ����������� ������� �� ��������� �����
25
26 1. ������ ���������� �� ������ ������ ��� ����������� � ���������� �����������.
27 2. ������ �������� ������, ������� ������ �������������� ��� �������,
28 ���������� ��������������
29 3. ������ �������������� ���������� ���������, �� ������ ��������
30 ���� ����������� �������� ������������, ���� ������������ ������� ��������������
31
32 ���������� �������� ������������ �������� ������ ��� ������� � ������ ��������������,
33 � ������ ���������� ���������� �������� ������, �������� �������������, ��������� �����
34 � �.�.
35
36 =cut