A database API written in Perl for a MySQL.

You will need to edit the settings for your server.

Enojy

A little function that returns a greeting based on the local time.

Simple function to check for a valid email address. Makes sure the @ and a . are in the right place. There is most likely a perl package on CPAN that would be more extensive, but this happens to work for my uses.

This is a little example of how to use threads in Perl. It creates three threads and runs them... That's it...

Prints the user's IP address and localtime on a web page.

Gets a regular expression that'll search for any regexp pattern specified in the parameters.

I needed to send an email through an authenticated SMTP server. I found the snippet on the PHP website to do the trick.

Another solution recommends using a text match pattern.
This works, but as long as you've got mail.jar in your classpath anyway, you might as well use this technique instead. (Plus, I think it works with older JDK 1.2+, whereas pattern.compile is 1.4+)

Note that it also accepts a comma-separated list of emails, just like a To: or CC: address line would.

Need to GZip a file using Perl?

Use Compress::Zlib.

This is a simple perl script which creates a GZip file.

Is this file the same as that file? The files may or may not be binary. We could compare the modify dates, or the sizes. But, those are not very accurate to know if a file has really changed.

Introducing MD5 Checksum. We can feed the files into Digest::MD5 in binary mode.

This is a great way to do Incremental Backups.

This is also an easy way to verify checksums when downloading files from the internet which list their MD5 Checksums.

You'll need the Digest::MD5 Perl Module.