NAME

App::Genpass - Quickly and easily create secure passwords

VERSION

Version 0.10

SYNOPSIS

use App::Genpass;

my $genpass = App::Genpass->new();
print $genpass->generate, "\n";

$genpass = App::Genpass->new( readable => 0, length => 20 );
print "$_\n" for $genpass->generate(10);

DESCRIPTION

If you've ever needed to create 10 (or even 10,000) passwords on the fly with varying preferences (lowercase, uppercase, no confusing characters, special characters, minimum length, etc.), you know it can become a pretty pesky task.

This script makes it possible to create flexible and secure passwords, quickly and easily.

use App::Genpass;
my $genpass = App::Genpass->new();

my $single_password    = $genpass->generate(1);  # returns scalar
my @single_password    = $genpass->generate(1);  # returns array
my @multiple_passwords = $genpass->generate(10); # returns array again
my $multiple_passwords = $genpass->generate(10); # returns arrayref

SUBROUTINES/METHODS

new

Creates a new instance. It gets a lot of options.

flags

These are boolean flags which change the way App::Genpass works.

repeat

You can decide how many passwords to create. The default is 1.

This can be overridden per generate so you can have a default of 30 but in a specific case only generate 2, if that's what you want.

readable

Use only readable characters, excluding confusing characters: "o", "O", "0", "l", "1", "I".

You can overwrite what characters are considered unreadable under "character attributes" below.

Default: on.

special

Include special characters: "!", "@", "#", "$", "%", "^", "&", "*", "(", ")"

Default: on.

verify

Verify that every type of character wanted (lowercase, uppercase, numerical, specials, etc.) are present in the password. This makes it just a tad slower, but it guarantees the result. Best keep it on.

Default: on.

attributes

length

How long will the passwords be.

Default: 10.

character attributes

These are the attributes that control the types of characters. One can change which lowercase characters will be used or whether they will be used at all, for example.

# only a,b,c,d,e,g will be consdered lowercase and no uppercase at all
my $gp = App::Genpass->new( lowercase => [ 'a' .. 'g' ], uppercase => [] );
lowercase

All lowercase characters, excluding those that are considered unreadable if the readable flag (described above) is turned on.

Default: [ 'a' .. 'z' ] (not including excluded chars).

uppercase

All uppercase characters, excluding those that are considered unreadable if the readable flag (described above) is turned on.

Default: [ 'A' .. 'Z' ] (not including excluded chars).

numerical

All numerical characters, excluding those that are considered unreadable if the readable flag (described above) is turned on.

Default: [ '0' .. '9' ] (not including excluded chars).

unreadable

All characters which are considered (to me) unreadable. You can change this to what you consider unreadable characters. For example:

my $gp = App::Genpass->new( unreadable => [ qw(jlvV) ] );

After all the characters are set, unreadable characters will be removed from all sets.

Thus, unreadable characters override all other sets. You can make unreadable characters not count by using the readable => 0 option, described by the readable flag above.

specials

All special characters.

Default: [ '!', '@', '#', '$', '%', '^', '&', '*', '(', ')' ].

(not including excluded chars)

generate

This method generates the password or passwords.

It accepts only one parameter, which is how many passwords to generate.

$gp = App::Genpass->new();
my @passwords = $gp->generate(300); # 300 passwords to go

This method tries to be tricky and DWIM (or rather, DWYM). That is, if you request it to generate only one password and use a scalar (my $p = $gp->generate(1)), it will return a single password.

However, if you try to generate multiple passwords and use a scalar (my $p = $gp->generate(30)), it will return an arrayref for the passwords.

Generating passwords with arrays (my @p = $gp->generate(...)) will always return an array of the passwords, even if it's a single password.

AUTHOR

Sawyer X, <xsawyerx at cpan.org>

DEPENDENCIES

Moose

List::AllUtils

BUGS AND LIMITATIONS

Please report any bugs or feature requests to bug-app-genpass at rt.cpan.org, or through the web interface at http://rt.cpan.org/NoAuth/ReportBug.html?Queue=App-Genpass. I will be notified, and then you'll automatically be notified of progress on your bug as I make changes.

SUPPORT

You can find documentation for this module with the perldoc command.

perldoc App::Genpass

You can also look for information at:

LICENSE AND COPYRIGHT

Copyright 2009-2010 Sawyer X.

This program is free software; you can redistribute it and/or modify it under the terms of either: the GNU General Public License as published by the Free Software Foundation; or the Artistic License.

See http://dev.perl.org/licenses/ for more information.