Errata for Learning Perl

"PFE (Programmer's Favorite Editor)" should be "PFE (Programmer's File Editor)" http://www.lancs.ac.uk/staff/steveb/cpaap/pfe/

The text of the book says the following: <begin clip from book> For example, suppose you had some HTML-like text, and you want to remove all of the tags <BOLD> and </BOLD>, leaving their contents intact. Here's the text: I'm talking about the cartoon with Fred and <BOLD>Wilma</BOLD>! And here's a substitution to remove those tags. But what's wrong with it? s#(.*)#$1#g; <end clip from book> That pattern won't replace the BOLD tags. Given what is written further on to demonstrate a non-greedy asterisk quantifier: s#<BOLD>(.*?)</BOLD>#$1#g; I am guessing that the original pattern was meant to be the following which uses a greedy asterisk quantifier: s#<BOLD>(.*)</BOLD>#$1#g;

The text in paragraph 6 implies if and only if the environment variable 'VERBOSE' is set the code snippet below will print a message, but the code snippet assigns '1' if the environment variable is not set, which ends up evaluating to true and printing the message.

foreach my $arg ( @ARGV ) { push @new_ARGV, decode $codeset, $_; } should be foreach my $arg ( @ARGV ) { push @new_ARGV, decode $codeset, $arg; } or foreach ( @ARGV ) { push @new_ARGV, decode $codeset, $_; }

This is the code section: chomp(my $dir = <STDIN>); if ($dir =~ /\A\s*\Z/) { # A blank line Because there will never be a newline after the end-of-string anchor, change "\Z" to "\z": chomp(my $dir = <STDIN>); if ($dir =~ /\A\s*\z/) { # A blank line

Change all instances of "\z" to "\Z".

This is the line: print { $rock_fh }; # uses $_ by default According to the documentation, only a real filehandle like FH can be used alone to print the contents of $_. Using an indirect filehandle as seen in this example gives a syntax error.