#!/usr/bin/perl -wT
# news.pl

use Strict;
use CGI qw(:standard);