#!/usr/bin/perl

print "Content-Type: text/plain\015\012\015\012Hello";

__END__

=head1 NAME

Hello World

=cut