$ perl -le 'print unpack "h*", pack "D", sqrt 2;'
4846ed9f333f405bfff3000000000000