Archive::Rgssad::Keygen - Internal utilities to generate magickeys.
use Archive::Rgssad::Keygen qw(keygen); my $seed = 0xDEADCAFE; my $key = keygen($seed); # get next key my @keys = keygen($seed, 10); # get next 10 keys
Uses KEY as seed, generates NUM keys, and stores the new seed back to KEY. If NUM is omitted, it generates 1 key, which is exactly KEY. In scalar context, returns the last keys generated.
<watashi at watashi.ws>
You can find documentation for this module with the perldoc command.
You can also look for information at:
Copyright 2012 Zejun Wu.
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.