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.