###########################################################3
Rod,
"qw" stands for "Quoted Words". Something like :standard is called a
'bareword'. A bareword is something that is not recognized by the perl
parser. qw does the quoteing for you. "use CGI qw(:standard);" is the
same as writing "use CGI ':standard';"
As for the reason that it doesn't display until the script is
finished. That is a web browser issue. Some browsers (Not mentioning
any names Microsoft) wait until they see '</html>' to display. Really
good Webbrowsers like Mozilla, Netscape, Opera will display as they
recieve information. That 30 second sleep is hosing your internet
explorer.
Also, since you are using the CGI module, try using it's functions.
Se my untested modifications on your functions below..
Ciao,
Kristofer.
=================================
#!/usr/bin/perl
use strict;
use warnings;
use diagnostics;
use CGI qw(:standard); #I really do not understand the qw
use CGI::Carp qw(fatalsToBrowser);# or the qw here
sub Main {
my ($test, $pop3pass);
print header(),
start_html({-title => 'User Testing'}),
"Print 1st line",
br(),
"Print 2nd line",
br(),
end_html();
}
Main();
1;
=====
-----BEGIN GEEK CODE BLOCK-----
Version: 3.12
GIT d s+:++ a C++ UL++ US+ P+++ L++
W+++ w PS PE t++ b+ G e r+++ z++++
------END GEEK CODE BLOCK------
__________________________________
Do you Yahoo!?
SBC Yahoo! DSL - Now only $29.95 per month!
http://sbc.yahoo.com
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
