NAME

Crypt::Juniper - Encrypt/decrypt Juniper $9$ secrets

VERSION

Version 0.02

SYNOPSIS

    use Crypt::Juniper;
    my $secret = juniper_decrypt('$9$LbHX-wg4Z');  ## $secret="lc";
    my $crypt = juniper_encrypt('lc');             ## encrypt it

EXPORTED FUNCTIONS

juniper_decrypt($crypt)

Decrypt the string $crypt, returning the corresponding plain-text. Input string must be of the format "$9$blahblah". This function will die() if there any processing errors.

juniper_encrypt($secret)

Encrypt the plain text $secret, returning a result suitable for inclusion in a Juniper configuration.

AUTHOR

kevin brintnall, "<kbrint at rufus.net>"

COPYRIGHT & LICENSE

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