CODE EXAMPLE FOR PERL

read a file in perl

#!/usr/bin/perl
use warnings;
use strict;

my $filename = 'c:	emp	est.txt';

open(FH, '<', $filename) or die $!;

while(<FH>){
   print $_;
}

close(FH);
Code language: Perl (perl)