home *** CD-ROM | disk | FTP | other *** search
/ Netrunner 2004 October / NETRUNNER0410.ISO / regular / ActivePerl-5.8.4.810-MSWin32-x86.msi / _49b171f901ebcb1e5326d859e9573f31 < prev    next >
Encoding:
Text File  |  2004-06-01  |  515 b   |  20 lines
  1. # NOTE: Derived from ../LIB\DynaLoader.pm.
  2. # Changes made here will be lost when autosplit is run again.
  3. # See AutoSplit.pm.
  4. package DynaLoader;
  5.  
  6. #line 403 "../LIB\DynaLoader.pm (autosplit into ..\lib\auto\DynaLoader\dl_find_symbol_anywhere.al)"
  7. sub dl_find_symbol_anywhere
  8. {
  9.     my $sym = shift;
  10.     my $libref;
  11.     foreach $libref (@dl_librefs) {
  12.     my $symref = dl_find_symbol($libref,$sym);
  13.     return $symref if $symref;
  14.     }
  15.     return undef;
  16. }
  17.  
  18. 1;
  19. # end of DynaLoader::dl_find_symbol_anywhere
  20.