#!/usr/bin/perl
my @cc = ();
@cc = `pread cm 98`;
print "Content-type: text/html\n\n";
print <
Hello World Status
hello world: $cc[0]
HTML
_ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _
When run from the directory /home/test as
[xyz@daystar test]$ ./tst.pl
the output is correct:
Content-type: text/html
Hello World Status
hello world: RETAIL WEBSALE
_ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _
There is no output when run from directory /var/www/cgi-bin as
[xyz@daystar test]$ ./tst.pl
_ _ _ _ _ _ _ _ _ _ _ _ _ _ _ _
However, when run and piping output to 'more' using the command
[xyz@daystar test]$ ./tst.pl | more
the output is:
Content-type: text/html
Hello World Status
hello world: