1#!/usr/bin/perl
2use CGI qw/:standard/;
3print header ( -status => 404
4               -type   => 'text/plain' );
5print ("send404\n");
6