I had tried the undef $/; approach before posting. It didn't work. I wrote the code like

undef $/;
open FILE, shift;
my @lines = <FILE>;
close FILE;
foreach my $str (@lines){print $str};
[download]

But the output was just the same.

To make the matters more funny for me, I created a file Sample2.java with the content

package my;
import n.a.m.e;
import i.s;
import a.b.h.i.s.h.e.k;
import s.r.i.v.a.s.t.a.v.a;
[download]

It worked perfectly !! So what's wrong with the first file??
regards,
Abhishek.