Authen::Htpasswd::User(3p)

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.