in reply to C any bugs?
- use strict or die (updated)
- declare your variables with my
- Try CGI's builtin functions for generating the header, form, tags and actually all html. use CGI qw/:html3/
- I wouldn't use eval to trap errors. There is an option for CGI like use CGI::Carp 'fatalsToBrowser'; (updated).
- The while loop could be done more concise:
while( <GUESTS> ){ #no chomp, we need the \n later on... split /::/; if( $_[0] =~ /$search_name) { print join "<BR>\n", @_; print "<HR>\n"; } }
- Try use diagnostics;, maybe you like it. I do.
</code> "We are not alone"(FZ)
|
---|
In Section
Seekers of Perl Wisdom