Snipplr

(Perl) capitalize words - noah

Tue, 03 Jul 2007 22:53:02 GMT

(Perl) id3.pl - noah

Tue, 03 Jul 2007 22:40:18 GMT

This script takes a list of directories as its argument. For mp3s that don't have any id3 information, guess the name of the artist and track based on the filename and use the MP3-Info module to insert that guess into the file as id3v1 tags.

(Perl) Truncate filenames but keep file extensions intact - noah

Tue, 03 Jul 2007 22:33:28 GMT

(Perl) Grab linked files from a list of web pages - noah

Tue, 03 Jul 2007 22:31:30 GMT

Expects as argument the name of a file containing a newline-delimited list of URLs. When invoked, launches an interactive shell that asks what type of file should be downloaded. Then downloads all the files that are linked from each of the listed Web pages.

(Perl) Remove duplicate lines from a text file - noah

Tue, 03 Jul 2007 22:06:34 GMT

Sometimes I get a big list of things, and some of the things occur multiple times in the same list. A good example is a newline-delimited list of files: the same file path might be listed 4 or 5 times. So this script removes those kinds of duplicate lines. Found at Google Answers.

(Perl) insert ALT attribute into IMG tags that don't already have ALT attributes - noah

Tue, 03 Jul 2007 21:43:16 GMT

At one point I wanted to give every image on my site an ALT tag. I did, with some help from beginners@perl.org.

(Perl) Examine CSS selectors in JSP files and report on whether they match some patterns - noah

Tue, 03 Jul 2007 21:27:59 GMT

Processe a directory of JSP source files, looks for regex matches, and reports on the number and location of matches. For detecting deprecated attributes in XHTML. Uses Mail::Outlook to send an email. Requires you to click "ok" each time a notification is sent, but gets around firewalls.