Return to _bug.pl CVS log

Up to [parser3project] / parser3 / www / htdocs

Annotation of parser3/www/htdocs/_bug.pl, revision 1.3.6.1

1.1       paf         1: #!c:/perl/bin/perl
                      2: 
1.3       paf         3: #a
1.3.6.1 ! paf         4: print "header:value from $ARGV[0]\n";
1.3       paf         5: print "Header1: lala1111\n";
                      6: print "\n";
1.2       paf         7: 
1.1       paf         8: print $ENV{QUERY_STRING};
1.3.6.1 ! paf         9: open BUG, '>_bug.txt';
        !            10: print BUG $ENV{QUERY_STRING};
        !            11: print BUG $ARGV[0];
1.1       paf        12: print "done";