the file is only 8KB, but it just got stuck. nothing in progress..use strict; use File::tail; my $file = File::Tail->new('C:/Users/tiang/Documents/Perl/daily.20170 +731142932.txt'); while(defined(my $line = $file->read)) { print "$line\n"; }
In reply to Re^2: how to populate array with last 20 lines of file
by ytjPerl
in thread how to populate array with last 20 lines of file
by ytjPerl
| For: | Use: | ||
| & | & | ||
| < | < | ||
| > | > | ||
| [ | [ | ||
| ] | ] |