in reply to Best random number
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; }
|
---|
Replies are listed 'Best First'. | |
---|---|
Re: Re: Best random number
by hardburn (Abbot) on Dec 19, 2002 at 15:42 UTC | |
by Abigail-II (Bishop) on Dec 19, 2002 at 16:05 UTC | |
by hardburn (Abbot) on Dec 19, 2002 at 16:52 UTC |