use Win32::OLE::Const('Microsoft Excel');: modul abhängig einbinden - #74866 (Allgemeines zu Perl)

2007-03-08 11:32

User since
2006-05-09
76 Artikel
BenutzerIn
[default_avatar]

@renee
das funktioniert leider nicht... :-(
nach der ausführung auf einem rechner ohne excel bleibt $OLE = 0

Code: (dl )

my $OLE = 0;

BEGIN
{
   eval
   {
       require Win32::OLE::Const;
       Win32::OLE::Const->import('Microsoft Excel');
       $OLE = 1;
   };
   
   if ( $@ )
   {
       require Spreadsheet::SimpleExcel;
       $OLE = 2;
   }
}

print qq(Result: $OLE\n);