my $auth = CGI::FileManager::Auth->new(); if ($auth->verify($username, $password)) { # Valid user } else { $ Invalid username/password pair } Currently username/password pairs are hard coded and clear text. Just for testing. Later we expect to have Authentication plugins to the system and this module will probably hide them from the real module.
my $auth = CGI::FileManager::Auth->new; Does nothing
my $self = { users => { gabor => { password => 'nincs', home => "$Bin/../dir", #home => '/home/gabor/work/gabor/dev/CGI-FileManager/dir', } }, }; bless $self, $class;
Return the home directory of the given user
verify username password
To install CGI::FileManager, copy and paste the appropriate command in to your terminal.
cpanm
cpanm CGI::FileManager
CPAN shell
perl -MCPAN -e shell install CGI::FileManager
For more information on module installation, please visit the detailed CPAN module installation guide.