[perlce-user] RE: DynaLoader drives me nuts!!!

[Konovalov, V. <vko...@sp...>]

> I fell like I'm stupid but I really don't manage to use 
> DynaLoader as you 
> explain it on your website to fix the startup time problem.

It's probably my fault, I was not clear enough.

Also, just because your startup time much less than 1 second, may be you do
not need no "tricks" by holding DLLs in memory?
The point is - my Cassiopeia E-125 is now old enough, and I probably should
revise time estimates.

However here is approximation of my script that does the trick for me:

BEGIN{
use DynaLoader;
my $lpath='\storage card\apps';
my $lpath='\storage card\apps\tcl844';
DynaLoader::dl_load_file("$lpath\\bin\\tcl84.dll");
DynaLoader::dl_load_file("$lpath\\bin\\tk84.dll");
DynaLoader::dl_load_file("$lpath\\bin\\tix8184.dll");
}
use Tcl::Tk;
my $in=new Tcl::Tk;
print 'this app needed only
to boost loading of perl app...';
#<STDIN>;
$in->MainLoop;



Probably you did not enclosed your "DynaLoader::dl_load_file" in BEGIN{}
block (and I forgot to advice this).
Also, I use this script to startup Tcl/Tk to have GUI (and to select desired
Tcl/Tk among few installed versions) but in your case you should delete
appropriate lines and just uncomment "<STDIN>;" line.

Main page for PerlCE project certainly needs to be updated.

Also, there is another similar problem (conflict between different
Socket.dll in \windows and perl58/lib/auto/io/socket) and I afraid I forgot
to solve this problem in distribution.



I'll what I can do at nearest weekend.

Best regards,
Vadim.