Beefy Boxes and Bandwidth Generously Provided by pair Networks
Do you know where your variables are?
 
PerlMonks  

Re: Help!! Premature ending of script headers?

by Anonymous Monk
on Oct 13, 2011 at 22:43 UTC ( #931386=note: print w/ replies, xml ) Need Help??


in reply to Help!! Premature ending of script headers?

it still won't work. :(

Like CGI Help Guide and Troubleshooting Perl CGI scripts say:

Check the logs!!! or keep your own ( see CGI::Carp::carpout )

Read this if you want to cut your development time in half!

use CGI or die;, Ovids CGI Course, CGI Programming 101,

Try this on for size :)

#!/usr/bin/perl -- use strict; use warnings; use CGI (); use Data::Dumper (); #zum debuggen Main( @ARGV ); exit( 0 ); sub Main { return DebugCGI(); } sub DebugCGI { my $cgi = CGI->new; print $cgi->header(); # Write HTTP header print $cgi->start_html, $cgi->b( rand time, ' ', scalar gmtime ), '<table border="1" width="%100"><tr><td>', $cgi->Dump, '</td>', '<td><div style="white-space: pre-wrap; overflow: scroll;">', $cgi->escapeHTML( DD($cgi) ), '</div></td></tr></table>', CGI->new( \%ENV )->Dump, $cgi->end_html; } sub DD { scalar Data::Dumper->new( \@_ )->Indent(1)->Useqq(1)->Dump; }


Comment on Re: Help!! Premature ending of script headers?
Download Code

Log In?
Username:
Password:

What's my password?
Create A New User
Node Status?
node history
Node Type: note [id://931386]
help
Chatterbox?
and the web crawler heard nothing...

How do I use this? | Other CB clients
Other Users?
Others scrutinizing the Monastery: (8)
As of 2014-12-20 21:04 GMT
Sections?
Information?
Find Nodes?
Leftovers?
    Voting Booth?

    Is guessing a good strategy for surviving in the IT business?





    Results (98 votes), past polls