My question to my fellow Monks is - can it be done in Perl? (and if so, how would be appreciated)

Sure why not (it's perl). Here's how

open FILE, 'foo.ppt' or die "$!";
binmode FILE;
read FILE, my $file, -s FILE, 0;
close FILE;
[download]