A Minimal Windows Azure Storage Client Library in Perl

Earlier this week I wrote a minimal Windows Azure storage client library in Perl. You can find it on GitHub: https://github.com/smarx/waz-storage-perl. So far it only supports storing and retrieving blobs, and it hasn’t been well tested, but if you’re using Perl to interact with Windows Azure storage, this is probably a good starting point. (It’s also a reasonable piece of code to read if you just want to understand how to construct a signature for a storage REST API call.)

It’s been a long time since I’ve written any Perl code, so I welcome any feedback on the code (style, correctness, efficiency). My favorite Perl idiom from the signing code is @{[$req->header('Content-MD5')]}, which makes string interpolation work with the arrow operator.