##
BEGIN {
use Archive::Zip;
my $zip = new Archive::Zip('Bam-Kapow.par');
$zip->extractTree('', 'shazam/');
use lib 'shazam/lib';
}
END { use File::Path; rmtree 'shazam/'; }
##
##
Using Bam::Kapow version 0.01
MOTD: Message of the day: PAR rules!
Got Bam::Kapow from shazam/lib/Bam/Kapow.pm
##
##
use PAR 'extract';