#opening a file, checking the error code.
$fname="/home/isg/report.txt";
open xyz, $fname or die "Error in open:$!";
while(<xyz>){
	print "line number $. is : $_";
}