diff --git a/Password.pm b/Password.pm index 645d290..ace4b32 100644 --- a/Password.pm +++ b/Password.pm @@ -182,7 +182,7 @@ sub generate { my @r_special = ( '!', '@', '(', ')', '#', '$', '%', '^', '&' ); for (1..10) { foreach my $special (@r_special) { - $chars[ rand(@chars) ] = $special ]; + $chars[ rand(@chars) ] = $special; } }