#/usr/bin/perl

use strict;
use LWP::Simple;

my $w = get('http://qwerty.on.arena.ne.jp/cgi-bin/bbs.cgi')