To open the file we use the open() function. We could have specified a full file path here, or a relative file path, but since the file is in the same directory as the script in this case, we can just use the file name. Open(INPUT, $filename) or die 'Cannot open $filename' įirstly we store the file name in a variable for easy reference. We've also added use warnings so that we are automatically warned about some potential problems.įinally, we've declared a main() subroutine to act as a clearly-defined starting point for our program, and we've called main() to actually start the program. We've added use strict to force us to declare all variables with my. The code above is a good structure to use for all your Perl programs. The first thing we need is a basic Perl program that will serve as the starting point for our CSV reader. We'll assume the file is, as is typically the case, ASCII encoded, not UTF8 or some such thing. Let's suppose we have the following data in a file named 'test.csv'. While the exact form of the Perl program you use to read such files will naturally depend on exactly what you're trying to achieve, this task is sufficiently common that it's worth going over some of the basics in tutorial form. A common task in Perl is reading files of comma separated values.

Perl find word in file