Question by Magician: In PERL how do you open different text files with the same program?
Say my code is:
# PRO1.pl
open (MYFILE, ‘data.txt’);
while (
chomp;
print “$ _\n”;
}
close (MYFILE);
But I want to run all these from this PRO1.pl program
$ perl PRO1.pl part1.txt
$ perl PRO1.pl part2.txt
$ perl PRO1.pl part3.txt
What do I change ‘data.txt’ so I can use any text file with this program.
I know I can be change it to a variable
$ fileName=’data.txt’
open (MYFILE, $ fileName);
But how do I get a parameter into the program so that it will open the parameter file and not the variable file.
Best answer:
Answer by rknoblock
One solution would be to create a file containing the names of files to be processed by the program. The data file used as a parm on the command line would provide the program with a list of files to be processed. Open that file, read the names of the files into an array, close the file, and then open and process the files named in the array.
What do you think? Answer below!
