perl -e 'print pack("H16",join("",map{$_=chr(int(rand(177)));}(1..56)));' >>keyfile.key