Question 2:
I can't get the function that the code snippet sits in to work. The recursion is breaking on me, as I can't get the $line to replace inside the if clause.
sub parseFile {
my ($page, $atTxt, $fullLine) = ("","","");
my @file = @_;
foreach my...