Question : read a file in perl
Answered by : zealous-zebra-ckmoizbjzw3r
#!/usr/bin/perl
use warnings;
use strict;
my $filename = 'c:\temp\test.txt';
open(FH, '<', $filename) or die $!;
while(<FH>){ print $_;
}
close(FH);
Code language: Perl (perl)Source : https://www.perltutorial.org/perl-read-file/ | Last Update : Thu, 03 Feb 22