#!/usr/bin/perl

use CGI qw(:standard);

$CGI::HEADERS_ONCE =1;