October 2001
Beginner
528 pages
15h 20m
English
Content preview from Perl for Web Site ManagementBecome an O’Reilly member and get unlimited access to this title plus top books and audiobooks from O’Reilly and nearly 200 top publishers, thousands of courses curated by job role, 150+ live events each month,
O’Reilly covers everything we've got, with content to help us build a world-class technology community, upgrade the capabilities and competencies of our teams, and improve overall team performance as well as their engagement.I wanted to learn C and C++, but it didn't click for me until I picked up an O'Reilly book. When I went on the O’Reilly platform, I was astonished to find all the books there, plus live events and sandboxes so you could play around with the technology.I’ve been on the O’Reilly platform for more than eight years. I use a couple of learning platforms, but I'm on O'Reilly more than anybody else. When you're there, you start learning. I'm never disappointed.I'm always learning. So when I got on to O'Reilly, I was like a kid in a candy store. There are playlists. There are answers. There's on-demand training. It's worth its weight in gold, in terms of what it allows me to do.
Writing the Modified Files Back to Disk
Just one more component is needed in our power-editing script: the part where it takes the modified content from the HTML file and writes it back out to disk, replacing the previous version of the file. Before doing that, though, let’s run a test by having the script print out the modified files to our screen, so we can check to make sure the correct changes are being made. Once we’re satisfied with that, we can make the final modifications to the script that will cause it to actually update the files on disk.
Below the while loop that cycles through the
reading of each file’s contents, and below the close IN statement but before the right curly brace that ends the
larger foreach loop that cycles through each file,
we’ll add the following to the script:
# print $content, to check the changes print "File $file, after changes:\n\n$content\n";
Now you can run the script at the command line, piping its output to more, and page your way through the output, checking to make sure that only the changes you intended are being made:
[jbc@andros testsite]$ fix_links.plx *.html | more
File form_to_email.html, after changes:
<HTML>
<HEAD>
<TITLE>This is the title</TITLE>
</HEAD>
<BODY>
(etc.)Once you’re happy with the way that output looks, you can
comment out that print statement and add the
following lines just below it:
open OUT, "> $file" or die "can't open $file for writing: $!"; print OUT $content; close OUT or die "can't close $file after writing: ...
Become an O’Reilly member and get unlimited access to this title plus top books and audiobooks from O’Reilly and nearly 200 top publishers, thousands of courses curated by job role, 150+ live events each month,
and much more.
Read now
Unlock full access
More than 5,000 organizations count on O’Reilly
O’Reilly covers everything we've got, with content to help us build a world-class technology community, upgrade the capabilities and competencies of our teams, and improve overall team performance as well as their engagement.Julian F.
I wanted to learn C and C++, but it didn't click for me until I picked up an O'Reilly book. When I went on the O’Reilly platform, I was astonished to find all the books there, plus live events and sandboxes so you could play around with the technology.Addison B.
I’ve been on the O’Reilly platform for more than eight years. I use a couple of learning platforms, but I'm on O'Reilly more than anybody else. When you're there, you start learning. I'm never disappointed.Amir M.
I'm always learning. So when I got on to O'Reilly, I was like a kid in a candy store. There are playlists. There are answers. There's on-demand training. It's worth its weight in gold, in terms of what it allows me to do.