First of all I just started using cgi last week.  So, if you see
something strange in my code it would be lack of knowledge.  Here is the
question:

I have some lines that display stuff, then do more code, then display
more stuff.  Is there a way to get the first stuff displayed before the
other code runs?  here is an example:

########################################################
#!/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 "Content-type: text/html\n\n";
        print "<HTML>\n";
        print "<HEAD>\n";
        print "<TITLE>User Testing</TITLE>\n";
        print "</HEAD>\n";


        print "<BODY>\n";

        print "print 1st line<br>\n";
        sleep(30);
        print "print 2nd line<br>\n";
        print "<p><p><a href=\"javascript:history.back()\">back</a>\n";
        print "</BODY>\n";
        print "</HTML>\n";
}

Main();

#####################################################33

Nothing displays until after the script is done.

thanks
Rod.



-- 
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]

Reply via email to