in reply to (jeffa) Re: print file in cgi with perl
in thread print file in cgi with perl

This solution dont resolve my problem.
Now dont print anything in monitor.
#!C:/server/Perl/bin/perl.exe

use CGI qw(:standard);
use XML::Checker::Parser;
use strict;
use warnings;

my $checker = new XML::Checker;

open(INPUT, "dtdversao3.dtd") or die "$!";
my @array=<INPUT>;
close(INPUT);
my $i=0;
     print header;
     print start_html('A Simple Example');


     print for @array;


print end_html;

[download]

Replies are listed 'Best First'.
(jeffa) 3Re: print file in cgi with perl
by jeffa (Bishop) on Jul 23, 2003 at 16:22 UTC
    Are you sure about that? :) Remember, DTD's get parsed by the browser - try viewing the source.

    You probably should use dga's excellent suggestion and 

    print header('text/plain');

    [download]
    instead.

    jeffa

    L-LL-L--L-LL-L--L-LL-L--
-R--R-RR-R--R-RR-R--R-RR
B--B--B--B--B--B--B--B--
H---H---H---H---H---H---
(the triplet paradiddle with high-hat)
[reply]
[d/l]

In Section Seekers of Perl Wisdom