Skip to Content
Perl Graphics Programming
book

Perl Graphics Programming

by Shawn Wallace
December 2002
Beginner
478 pages
17h 55m
English
O'Reilly Media, Inc.
Content preview from Perl Graphics Programming

Adding New Features to the Gimp

As we will see in the last section of this chapter, it is possible to write standalone scripts that communicate with the Gimp as a separate process. First, however, we will concentrate on Gimp-Perl plug-ins that create new filters, special effects, or shortcuts for manipulating images with the Gimp’s user interface. We’ll cover selection areas, layers, undo and redo, pixel regions, and creating alternative user interfaces.

Handling Selections and Layers

The example in this section operates on a region of pixels selected by the user and illustrates the handling of layers and floating layers. It is also a Perl script that acts as a kind of macro for a sequence of actions, with a bit of extra capability such as allowing the option of working on a copy of the image.

The Apply Tint plug-in overlays a colored tone on an image, resulting in a simulated duotone or sepia-tone effect. It is most dramatic on grayscale images, but it also works on RGB images. The final effect may be duplicated manually using the Gimp’s toolbox by following these nine steps:

  1. Convert the image to RGB mode with <Image> → Image → Mode → RGB.

  2. Using one of the selection tools, select the area to be tinted.

  3. Select <Image> → Edit → Copy.

  4. Paste the selection into a new floating selection layer with <Image> → Edit → Paste.

  5. Apply <Image> → Filters → Blur → Gaussian Blur (IIR) with a radius of 5.

  6. Invert the floating layer with <Image> → Image → Colors → Invert.

  7. Use the <Image> → Filters → Colors → ...

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

AirBnbBlueOriginElectronic ArtsHomeDepotNasdaqRakutenTata Consultancy Services

QuotationMarkO’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.
Head of Cybersecurity
QuotationMarkI 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.
Field Engineer
QuotationMarkI’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.
Data Platform Tech Lead
QuotationMarkI'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.
Mark W.
Embedded Software Engineer

You might also like

Advanced Perl Programming

Advanced Perl Programming

Sriram Srinivasan
Perl One-Liners

Perl One-Liners

Peteris Krumins
Perl Template Toolkit

Perl Template Toolkit

Darren Chamberlain, Andy Wardley, David Cross

Publisher Resources

ISBN: 9781449358280Errata Page