use strict; use warnings; use feature 'say';

use Path::Tiny; # imports path()

my $filename = '/TEXT2.txt';

say for path( $filename )->lines_utf8({ chomp => 1 });

__END__