I was amazed to see how simple Perl makes it to read the lines of a file into an array.
#!/usr/bin/perl
open(I, “flavors.txt”);
@flavors = <I>;
With just two lines of code, you are ready to do some string munching. You can then run through the elements in the array with a loop similar to the following.
for($i=0; $i<@flavors.length; $i++) {
@flavors[i] =~ s/•//;
}
I would enjoy seeing some other ways to iterate through the array.