# 1. What is your file name?
my $file = 'my-file.txt';
# 2. Open the file for reading ( '<' )
open( FD, "<$file" ) or die "$0: error: $!\n";
# Slurp it up
my @lines = <FD>;
# Close the file
close FD;
I find that File::Find is decent for simple stuff. For recursive travesals with more specific operations in mind opendir, readdir, and chdir are simple and effective... if you have a good algorithm of course :)
./james
Hey,
I used Term::Screen to write a little status bar module. But it will only work correctly for my needs if I can pass it the row and column of the current cursor position on the terminal. I played around with Curses getyx() function, but it just did not seem to do what I want.
Basically I...
This site uses cookies to help personalise content, tailor your experience and to keep you logged in if you register.
By continuing to use this site, you are consenting to our use of cookies.