Merry Christmas#!/usr/bin/perl -w use strict; use LWP::UserAgent; my $ua = LWP::UserAgent->new(); my $response = $ua->get('http://www.random.org/cgi-bin/randnum?num=100 +&min=1&max=100&col=1'); if ($response->is_success) { print $response->content; } else { print $response->status_line; }
In reply to Re: Best random number
by t0mas
in thread Best random number
by bitman
| For: | Use: | ||
| & | & | ||
| < | < | ||
| > | > | ||
| [ | [ | ||
| ] | ] |