From 8c8dd25ef18f7cc065cf5e4edd5949efb45aa41f Mon Sep 17 00:00:00 2001 From: "Denis(Difrex) Zheleztsov" Date: Wed, 3 Sep 2014 18:51:28 +0400 Subject: [PATCH] Added special characters --- Password.pm | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/Password.pm b/Password.pm index e2c12eb..985796c 100644 --- a/Password.pm +++ b/Password.pm @@ -122,7 +122,7 @@ sub save { # Generate password sub generate { - my @chars = ( "A" .. "Z", "a" .. "z", 0 .. 9 ); + my @chars = ( "A" .. "Z", "a" .. "z", 0 .. 9, '!', '@', '$', '(', ')' ); my $string; $string .= $chars[ rand @chars ] for 1 .. 16;