note
Rhandom
<code>
require Socket; # very much core perl
my $_host = gethostbyaddr(Socket::inet_aton($ip), Socket::AF_INET());
</code>
<!-- Node text goes above. Div tags should contain sig only -->
<div class="pmsig"><div class="pmsig-1598">
<font size=1>my @a=qw(random brilliant braindead); print $a[rand(@a)];</font>
</div></div>
1002665
1002665