Initial commit

Perl script to extract descriptive metadata from DigiTool API