use lib '/some/path/Crypt-Juniper-0.02/lib/'
my $hash = $ARGV;
my $secret = juniper_decrypt($hash);
print "secret: $secret \n";
Using the script is straight forward:
$ perl juniper-decrypt.pl \$9\$U-iqf36A1cSTzRSreXxDik.Tzn/CuBI
The current 2.0 beta version of Nipper does not warn you about the $9$ format at all. This issue was reported to Titania and the upcoming release of Nipper will report use of the $9$ format. Of course the remediation is easy, use MD5 based hashes ($1$ format) on Juniper JUNOS where possible.