Select Code to Download

#!c:/sw/perl/bin/perl.exe

...
         "instantiate the Developer Automation Interface";

print "success!\n";

Couldn't instantiate the Developer Automation Interface: Can't modify 
+constant item in scalar assignment at (eval 2) line 2, at EOF
Bareword "Win32::OLE" not allowed while "strict subs" in use at (eval 
+2) line 1.

my $result = eval {$sub->()};