ERROR!

What you mean is

my $excel = Win32::OLE->GetActiveObject('Excel.Application') || Win32:
+:OLE->new('Excel.Application');
[download]

That is, s/or/||/.

jdporter
The 6th Rule of Perl Club is -- There is no Rule #6.