#This script recieves valid data POSTed to it from an HTML form. use CGI qw/:standard/; use CGI::Pretty; ### HERE IS THE PROBLEM: ###################################################### ##Un-comment one or the other of these next two lines to reproduce the problem# # # #print "Content-type: text/html\n\n"; #Using this line works beautifully. # # # #print header(); #Using this line stalls the browser. # # # ############################################################################### print "Confirmation"; print h1('Header'); print h4('Trying sysread..'); $data = try_sysread(); print $data; print h4('Sysread done..'); print end_html; exit; ########## sub try_sysread(){ sysread(STDIN,$d,$ENV{CONTENT_LENGTH}); return $d; };