aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
-rwxr-xr-xrandom-passphrase4
1 files changed, 2 insertions, 2 deletions
diff --git a/random-passphrase b/random-passphrase
index 2673e34..777f10c 100755
--- a/random-passphrase
+++ b/random-passphrase
@@ -1,7 +1,7 @@
#!/usr/bin/perl -w
use strict;
-my $size = 200;
+my $size = 100;
binmode(STDOUT, ":utf8");
@@ -11,7 +11,7 @@ while ($size) {
print STDERR "$size random bytes to read.\n";
read $rf, $o, 1;
if ($o ne "\n" && $o ne "\r") {
- print $o;
+ print unpack("H*", $o);
$size--;
}
}