Machine-generated memes in Perl
Motivation: Annoying People
As a demo, I used a sequence I shot during another vacation from my hotel room on the beach boardwalk at Venice Beach near Los Angeles [5]. It shows a tourist desperately trying to tow back a stubborn Segway to the rental company. Schadenfreude is the only true joy, says the cynic.
After extracting the photos from the video as described earlier, Listing 3 converts the individual frames into an animated GIF movie using the Imager module:
Listing 3
anigif
anigif shot*.png
The for
loop in line 7 iterates over all file names passed in at the command line. The animation size of 300x200 pixels in lines 14 and 15 and the 26 total frames selected result in an animated GIF of about 1MB named anim.gif
.
The write_multi()
method writes the frames read previously with the new()
function to the hard drive as a .gif
file. The necessary image format conversions are done automatically behind the scenes. The make_colors
option uses mediancut
to normalize the color table between the frames, thereby ensuring faster conversion. It is important to set the gif_loop
option to
, causing the browser to run the image sequence forever after loading the image (Figure 5).
For a perfect finishing touch, I want to add a funny header to all the screenshots, while leaving the footer empty. The script in Listing 1 will do just fine for the single frames:
for i in *.png do meme-simple $i "SEGWAY FAIL" "" done
The command anigif shot*-meme.png
reads all files with the -meme.png
extension and generates the animated GIF. Figure 6 shows a scene from the masterpiece. Throughout the entire movie, the heading with the title stays motionless and perched 100 pixels below the top edge of the (originally sized) image because the string is built into every frame in the same way. It is white and uses the Impact joke font. If you like, you can check out the animated image online [6].
Thoughts
At the cutting table, I muse about Internet humor and other design options: Should I perhaps generate jokes automatically from random text? Maybe using quotes from the IMDB movie portal? My interns will be really surprised next summer.
Infos
- Image Macros: http://en.wikipedia.org/wiki/Image_macro
- "I Can Has Cheezburger?": http://en.wikipedia.org/wiki/I_Can_Has_Cheezburger
- Listings for this article: ftp://ftp.linux-magazin.de/pub/listings/magazine/157
- "Battle Over 'GIF' Pronunciation Erupts" by Amy O'Leary, New York Times: http://bits.blogs.nytimes.com/2013/05/23/battle-over-gif-pronunciation-erupts/
- Michael Schilli, "Segway FAIL" (Video): http://www.youtube.com/watch?v=8_EbnF9xl-g
- Animated GIF for "Segway FAIL" movie: http://perlmeister.com/anim.gif
« Previous 1 2
Buy this article as PDF
(incl. VAT)
Buy Linux Magazine
Subscribe to our Linux Newsletters
Find Linux and Open Source Jobs
Subscribe to our ADMIN Newsletters
Support Our Work
Linux Magazine content is made possible with support from readers like you. Please consider contributing when you’ve found an article to be beneficial.
News
-
Juno Computers Launches Another Linux Laptop
If you're looking for a powerhouse laptop that runs Ubuntu, the Juno Computers Neptune 17 v6 should be on your radar.
-
ZorinOS 17.1 Released, Includes Improved Windows App Support
If you need or desire to run Windows applications on Linux, there's one distribution intent on making that easier for you and its new release further improves that feature.
-
Linux Market Share Surpasses 4% for the First Time
Look out Windows and macOS, Linux is on the rise and has even topped ChromeOS to become the fourth most widely used OS around the globe.
-
KDE’s Plasma 6 Officially Available
KDE’s Plasma 6.0 "Megarelease" has happened, and it's brimming with new features, polish, and performance.
-
Latest Version of Tails Unleashed
Tails 6.0 is based on Debian 12 and includes GNOME 43.
-
KDE Announces New Slimbook V with Plenty of Power and KDE’s Plasma 6
If you're a fan of KDE Plasma, you'll be thrilled to hear they've announced a new Slimbook with an AMD CPU and the latest version of KDE Plasma desktop.
-
Monthly Sponsorship Includes Early Access to elementary OS 8
If you want to get a glimpse of what's in the pipeline for elementary OS 8, just set up a monthly sponsorship to help fund its continued existence.
-
DebConf24 to be Held in South Korea
Busan will be the location of the latest DebConf running July 28 through August 4
-
Fedora Unleashes Atomic Desktops
Fedora has combined its solid distribution with rpm-ostree system to make it possible to deliver a new family of Fedora spins, called Fedora Atomic Desktops.
-
Bootloader Vulnerability Affects Nearly All Linux Distributions
The developers of shim have released a version to fix numerous security flaws, including one that could enable remote control execution of malicious code under certain circumstances.