<?xml version="1.0" encoding="windows-1252"?>
<node id="1005168" title="Re^2: Is this really random?" created="2012-11-22 13:30:22" updated="2012-11-22 13:30:22">
<type id="11">
note</type>
<author id="1001958">
karlgoethebier</author>
<data>
<field name="doctext">
&lt;p&gt;...what about using this?&lt;/p&gt;

&lt;code&gt;
#!/usr/bin/perl

use strict;
use warnings;

open(RANDOM, "&lt;", "/dev/random") || die $!;
read(RANDOM, $_, 4);
close RANDOM;
my $seed = unpack("L", $_);
print $seed . qq(\n);
srand($seed);
# do stuff...


&lt;/code&gt;

&lt;p&gt;Regards, Karl&lt;/p&gt;
&lt;!-- Node text goes above. Div tags should contain sig only --&gt;
&lt;div class="pmsig"&gt;&lt;div class="pmsig-1001958"&gt;
&lt;p&gt;«The Crux of the Biscuit is the Apostrophe»&lt;/p&gt;

&lt;/div&gt;&lt;/div&gt;</field>
<field name="root_node">
1005043</field>
<field name="parent_node">
1005048</field>
</data>
</node>
