the os on my comp is windows xp, but this script runs on the linux based server. I added the strictures you suggested and still it doesnt show any output. the file frame.txt i checked is not empty. I am executing it by viewing the page register.cgi on the browser in internet, after uploading the file on the server. Mt post does not contain the entire code in the program.... below is the whole file: 

#!/usr/bin/perl

print "content-type:text/html\n\n";

use CGI;
use strict;
use warnings;

print<<html1;

    <html>

    <head>
    <title>Register online</title>
    </head>

    <body style="background-color:#BC9FAC;">

html1

open(frame,'../frame.txt');
while(<frame>)
{
    print "$_\n";
}
close(frame);

print<<html2;

    <center>
        <div style="margin:0 auto;width:750px;height:420px;">
        

html2

[download]
and when i put this code into it: 

my $file = "../frame.txt";
if(-s ($file) >0) 
    {
#        open(FILE, '<', $file) or die $!;
#        while(<FILE>) {
#                 print $_, "\n";
#                 }
#       close(FILE);
    }
else
{
    print "$file contains no data\n";
}

[download]
then it outputs ../frame.txt contains no data. but i checked the file frame.txt.... it does contain text.

In reply to Re^2: Problem printing contents of file by ketaki
in thread Problem printing contents of file by ketaki

Title:
Use:  <p> text here (a paragraph) </p>
and:  <code> code here </code>
to format your post, it's "PerlMonks-approved HTML":


  • Posts are HTML formatted. Put <p> </p> tags around your paragraphs. Put <code> </code> tags around your code and data!
  • Titles consisting of a single word are discouraged, and in most cases are disallowed outright.
  • Read Where should I post X? if you're not absolutely sure you're posting in the right place.
  • Please read these before you post! —
  • Posts may use any of the Perl Monks Approved HTML tags:
    a, abbr, b, big, blockquote, br, caption, center, col, colgroup, dd, del, details, div, dl, dt, em, font, h1, h2, h3, h4, h5, h6, hr, i, ins, li, ol, p, pre, readmore, small, span, spoiler, strike, strong, sub, summary, sup, table, tbody, td, tfoot, th, thead, tr, tt, u, ul, wbr
  • You may need to use entities for some characters, as follows. (Exception: Within code tags, you can put the characters literally.)
            For:     Use:
    & &amp;
    < &lt;
    > &gt;
    [ &#91;
    ] &#93;
  • Link using PerlMonks shortcuts! What shortcuts can I use for linking?
  • See Writeup Formatting Tips and other pages linked from there for more info.