Sorting in CGI

[brady jacksan]

Hi,
I am writing a form that will list the name in the file namedata.dat in alphabetical 
order and display in a web page.
#!/usr/bin/perl
use strict;
use CGI qw(:standard);
my @namedata;
whie (<namedata>){
 @namedata = split (/\|/,$_);
 if ($namedata[0] =~name_word){
  print"<b> Firstname:$namedata[1]",br()"lastname:$namedata[0];
 }
}
 Why do I keep getting errors when I try to test my form?
 
Thanks,
Brady         


---------------------------------
Do you Yahoo!?
Yahoo! SiteBuilder - Free, easy-to-use web site design software