App::genpw - Generate random password, with patterns and wordlists


This document describes version 0.011 of App::genpw (from Perl distribution App-genpw), released on 2020-05-22.


See the included script genpw.




 genpw(%args) -> [status, msg, payload, meta]

Generate random password, with patterns and wordlists.

This is yet another utility to generate random password. Features:

  • Allow specifying pattern(s), e.g. '%8a%s' means 8 random alphanumeric characters followed by a symbol.

  • Use words from wordlists.

  • Use strong random source when available, otherwise fallback to Perl's builtin rand().


By default generate base56 password 12-20 characters long (-p %12$20B):

 % genpw

Generate 5 passwords instead of 1:

 % genpw 5

Generate random digits between 10 and 12 characters long:

 % genpw -p '%10$12d'

Generate password in the form of a random word + 4 random digits. Words will be fed from STDIN:

 % genpw -p '%w%4d' < /usr/share/dict/words

Like the above, but words will be fetched from WordList::* modules. You need to install the genpw-wordlist CLI. By default, will use wordlist from WordList::EN::Enable:

 % genpw-wordlist -p '%w%4d'

Generate a random GUID:

 % genpw -p '%8h-%4h-%4h-%4h-%12h'

Like the above, but in uppercase:

 % genpw -p '%8h-%4h-%4h-%4h-%12h' -U

Use configuration file to avoid typing the pattern every time, put this in ~/genpw.conf:

 patterns = "%8h-%4h-%4h-%4h-%12h"


 % genpw -P guid

This function is not exported.

Arguments ('*' denotes required arguments):

  • action => str (default: "gen")

  • case => str (default: "default")

    Force casing.

    default means to not change case. random changes casing some letters randomly to lower-/uppercase. lower forces lower case. upper forces UPPER CASE. title forces Title case.

  • len => posint

    If no pattern is supplied, will generate random alphanum characters with this exact length.

  • max_len => posint

    If no pattern is supplied, will generate random alphanum characters with this maximum length.

  • min_len => posint

    If no pattern is supplied, will generate random alphanum characters with this minimum length.

  • num => int (default: 1)

  • patterns => array[str]

    Pattern(s) to use.

    A pattern is string that is similar to a printf pattern. %P (where P is certain letter signifying a format) will be replaced with some other string. %Nw (where N is a number) will be replaced by a word of length N, %N$MP (where N and M is a number) will be replaced by a word of length between N and M. Anything else will be used as-is. Available conversions:

     %l   Random Latin letter (A-Z, a-z)
     %d   Random digit (0-9)
     %h   Random hexdigit (0-9a-f)
     %a   Random letter/digit (Alphanum) (A-Z, a-z, 0-9; combination of %l and %d)
     %s   Random ASCII symbol, e.g. "-" (dash), "_" (underscore), etc.
     %x   Random letter/digit/ASCII symbol (combination of %a and %s)
     %m   Base64 character (A-Z, a-z, 0-9, +, /)
     %b   Base58 character (A-Z, a-z, 0-9 minus IOl0)
     %B   Base56 character (A-Z, a-z, 0-9 minus IOol01)
     %%   A literal percent sign
     %w   Random word

Returns an enveloped result (an array).

First element (status) is an integer containing HTTP status code (200 means OK, 4xx caller error, 5xx function error). Second element (msg) is a string containing error message, or 'OK' if status is 200. Third element (payload) is optional, the actual result. Fourth element (meta) is called result metadata and is optional, a hash that contains extra information.

Return value: (any)


Please visit the project's homepage at


Source repository is at


Please report any bugs or feature requests on the bugtracker website

When submitting a bug or request, please include a test-file or a patch to an existing test-file that illustrates the bug or desired feature.


perlancar <>


This software is copyright (c) 2020, 2018 by

This is free software; you can redistribute it and/or modify it under the same terms as the Perl 5 programming language system itself.