coolsaurabh:

Please edit your post and wrap your code in code tags (<code> your code
goes here </code>) to get:

your code
goes here
[download]

Now on to your question: The biggest problem I see in your code is that you're not bothering to check the results of the open call. I suggest you do something like:

    open my $DF, '<', $file;
    if (! defined $DF) {
        print "Cannot open file '$file' because: $!";
    }
    else {
        while (my line = <$DF>) {
            print $line;
        }
        close $DF;
    }
[download]

This way, you can get an error message that may provide you some hints as to what the actual problem is.

I suspect that:

• you're not specifying the correct path to the file,
• there may be permissions issues with the file and/or path, or
• the file doesn't exist.

...roboticus

When your only tool is a hammer, all problems look like your thumb.