Re: funky AUTOLOAD
[email protected] (Joshua N Pritikin)
| Newsgroups | perl.loop |
|---|---|
| Message-ID | <[email protected]> |
On Fri, Feb 04, 2000 at 11:46:29AM +0000, [email protected] wrote: > $ perl -MEvent -e 'require Event::Watcher; system("ps l $$"); require "Event/$_.pm" for (qw(idle inactivity io signal timer var)); system("ps l $$");' > F UID PID PPID PRI NI VSZ RSS WCHAN STAT TTY TIME COMMAND > 000 1002 2157 2132 9 0 2880 1636 wait4 S pts/5 0:00 perl -MEvent -e require Event::Watcher > F UID PID PPID PRI NI VSZ RSS WCHAN STAT TTY TIME COMMAND > 000 1002 2157 2132 15 0 2940 1696 wait4 S pts/5 0:00 perl -MEvent -e require Event::Watcher > > is 60K really worth it. Hm. I see even less savings on my Solaris 7 sun4u sparc SUNW,Ultra-1 machine. [joshua@eq1062] % perl -e 'system("ps -l -p $$"); require Event; system("ps -l -p $$"); require "Event/$_.pm" for qw(idle io signal timer var); system("ps -l -p $$")' F S UID PID PPID C PRI NI ADDR SZ WCHAN TTY TIME CMD 8 S 10511 21540 18239 1 51 20 713a8750 351 713a87bc pts/6 0:00 perl F S UID PID PPID C PRI NI ADDR SZ WCHAN TTY TIME CMD 8 S 10511 21540 18239 1 75 20 713a8750 452 713a87bc pts/6 0:00 perl F S UID PID PPID C PRI NI ADDR SZ WCHAN TTY TIME CMD 8 S 10511 21540 18239 2 85 20 713a8750 460 713a87bc pts/6 0:00 perl The difference between Event and Event with watchers is about 8K. > I would say just add requires for the standard Event classes into Event.pm OK. I'll load these by default: qw(idle io signal timer var). -- "May the best description of competition prevail." via, but not speaking for Deutsche Bank