The Perl Toolchain Summit needs more sponsors. If your company depends on Perl, please support this very important event.

NAME

Authen::Htpasswd::User - represents a user line in a .htpasswd file

SYNOPSIS

    my $user = Authen::Htpasswd::User->new($username, $password[, @extra_info], \%options);
    my $user = $pwfile->lookup_user($username); # from Authen::Htpasswd object
    
    if ($user->check_password($password)) { ... }
    if ($user->hashed_password eq $foo) { ... }
    
    # these are written immediately if the user was looked up from an Authen::Htpasswd object
    $user->username('bill');
    $user->password('bar');
    $user->hashed_password('tIYAwma5mxexA');
    $user->extra_info('root', 'joe@site.com', 'Joe Sysadmin');
    $user->set(username => 'bill', password => 'foo'); # set several at once
    
    print $user->to_line, "\n";
 

METHODS

new

    my $userobj = Authen::Htpasswd::User->new($username, $password[, @extra_info], \%options);

Creates a user object. You may also specify the arguments and options together in a hash: { username => $foo, password => $bar, extra_info => [$email, $name], ... }.

encrypt_hash
check_hashes

See Authen::Htpasswd.

hashed_password

Explicitly sets the value of the hashed password, rather than generating it with password.

check_password

    $userobj->check_password($password,\@check_hashes);

Returns whether the password matches. check_hashes is the same as for Authen::Htpasswd.

username

hashed_password

extra_info(@fields)

Get and set the fields of the user line. These methods, as well as password and set below, write any changes immediately if the user was lookup up from an Authen::Htpasswd object. If the username is changed, the old entry is not preserved.

password

    $userobj->password($newpass);

Encrypts a new password. Dies if $newpass is not provided.

set

    $userobj->set(item => $value, ...);

Sets any of the four preceding values at once. Only writes the file once if it is going to be written.

to_line

    $userobj->to_line;

Returns a line for the user, suitable for printing to a .htpasswd file. There is no newline at the end.

AUTHOR

David Kamholz dkamholz@cpan.org

Yuval Kogman

COPYRIGHT & LICENSE

    Copyright (c) 2005 - 2007 the aforementioned authors.
    
    This program is free software; you can redistribute
    it and/or modify it under the same terms as Perl itself.