why won't this script work?

• From: Jauder Ho <jauderho@med.umich.edu>
• Date: Wed, 10 May 1995 13:49:08 -0400 (EDT)
• To: www-html@www10.w3.org
• Cc: jauderho@med.umich.edu
• Message-Id: <Pine.3.89.9505101312.A14149-0100000@hendrix.itn.med.umich.edu>

	Can someone tell me why the following cgi script won't work?

#!/usr/local/bin/perl

open(AHOST,"ahosts");
while (<AHOST>) {
        print $_;
}

ahost is just a text file in the same directory

====================================================================
Jauder Ho                 http://spwww.mcit.med.umich.edu/~jauderho/
Special Projects			      jauderho@med.umich.edu
Medical Center Information Technology (MCIT)
University of Michigan Medical Center, B1911 CFOB     
1414 Catherine Street, Ann Arbor, MI 48109-0704       (313) 936-4897
====================================================================

Received on Wednesday, 10 May 1995 13:51:29 UTC