#!/usr/bin/perl use LWP::Simple; use LWP::UserAgent; use DBI; use CGI::Carp qw/ fatalsToBrowser /; print "Content-type: text/html\n\n"; $url = "http://wire.ap.org/APnews/center_minor.html?FRONTID=SCIENCE"; $body = get("$url"); print "$body";