#!/usr/bin/perl -w 
open FILE, "abc.txt" or die $!;
while (<FILE>) {
script should go here 
}</p>
close (FILE);