epita-std/ACU
Archived
1
0
Fork 0
Code Releases Activity

Add a command to generate pass

Browse source
This commit is contained in:
Mercier Pierre-Olivier 2013-09-15 14:51:25 +02:00
parent 01e723db5e
commit 5aecf8b8b1
1 changed files with 14 additions and 0 deletions
Download patch file Download diff file Expand all files Collapse all files

14
commands/gen_pass.pl Normal file
View file

@ -0,0 +1,14 @@
#! /usr/bin/env perl
use v5.10.1;
use strict;
use warnings;
use Pod::Usage;
BEGIN {
push @INC, "../";
}
use ACU::Password;
say Password::gen_password($ARGV[0], $ARGV[1]);