this was an attempt to make a password generator that creates the same ASCII password every time, given an arbitrary string. (basically 1 password per website)
this is what i have so far: echo masterpassword gmail.com | perl -MDigest::SHA -ne '$h = $_; for (1..10) { $h=Digest::SHA::sha512_hex("$h") }; $_=$h; while (/(..)/g) { $x=$1; $x = int((hex $x) / 2); if( $x ~~ [33..126] ) {print chr($x)}; END {print "\n";};}' | cut -b1-10 I also want to incorporate this, it removes duplicate characters (irrespective of location), but my current code doesn't let me just slip it in. $s =~ s[(.)(?=.*?\1)][]g;