#!/usr/bin/perl use CGI qw/:standard/; header(-status => 404);