NAME

PTools::Passwd - Generate and validate Unix-style passwords

VERSION

This document describes version 1.03, released October, 2004

SYNOPSIS

 use PTools::Passwd;

 Encrypt a text string:

     $passwd = encrypt PTools::Passwd("clearTextPassword");
     print "Encrypted password: ", $passwd->toStr(), "\n";

 Invoke a comparison as an object method:

     if ( $passwd->verify("clearTextPassword") ) {
        print "Yep, they match.\n";
     } else {
        print "Nope, no match.\n";
     }

 Invoke a comparison as a class method:

     if ( PTools::Passwd->verify("clearText","encryptedText") ) {
        print "Yep, they match.\n";
     } else {
        print "Nope, no match.\n";
     }

 Generate a random password:

     $encryptedText = $passwd->random();       # 12 bytes by default
     $encryptedText = $passwd->random( 64 );   # 64 bytes by request

DESCRIPTION

A simple little class to generate and validate Unix-style passwords.

AUTHOR

Chris Cobb [no dot spam at ccobb dot net]

(Adapted from "Object Oriented Perl" by Damian Conway, Chap. 4)

COPYRIGHT

Copyright (c) 2004-2007 by Chris Cobb. All rights reserved. This module is free software; you can redistribute it and/or modify it under the same terms as Perl itself.