Petr,
Thanks,
I tried this and you're right the problem is with the win32::OLEL::const
line. I tried your code and the program starts faster (because the line
isn't there) but hangs for a long time when it gets to some of the lines
like this:
$Sheet->Rows($line+10)->{PageBreak} = -4135;
Any ideas on this ?
Is there any other way to manipulate excel other than the ole module ?
Thanks,
Tony
At 08:45 AM 4/11/2001 +0200, Petr Smejkal wrote:
> > use Win32::OLE qw(in with);
> > use Win32::OLE::Const 'Microsoft Excel';
>
>I don't think that the cause is the first line. I'd blame the second one.
>I'm using Win32::OLE in production and on some machines (some WinNT4) it
>tooks a whole minute to find and import all the constants. I believe it can
>take longer under certain circumstances. :)
>
>How to get rid of it?
>Try to use following script to remove all the contants before compiling the
>application.
>
>--------------remove_xlConst.pl----------------------
>
>use Win32::OLE::Const 'Microsoft Excel';
>
>while (<>) {
> next if /OLE::Const/;
> s/(xl[a-zA-Z0-9]+)/eval("$1")/eg;
> print;
>}
>
>----------------------------------------------------
>
>perl remove_xlConst.pl < myapp.pl > myapp.clean.pl
>perlapp -f myapp.clean.pl -e=myapp.exe
>delete myapp.clean.pl
>
>-- Petr Smejkal
_______________________________________________
ActivePerl mailing list
[EMAIL PROTECTED]
http://listserv.ActiveState.com/mailman/listinfo/activeperl
