--- gpg/random-passphrase 2011/02/03 18:17:39 402 +++ gpg/random-passphrase 2011/02/03 18:31:48 403 @@ -10,10 +10,8 @@ my $o; print STDERR "$size random bytes to read.\n"; read $rf, $o, 1; - if ($o ne "\n" && $o ne "\r") { - print unpack("H*", $o); - $size--; - } + print unpack("H*", $o); + $size--; } close($rf);