Select Code to Download

   my $libref = dl_load_file($file, $module->dl_load_flags) or 
        croak("Can't load '$file' for module $module: ".dl_error());

package Sybase::Simple; 
 
...
 
use Carp; 
use Sybase::CTlib qw(:DEFAULT !ct_callback);

$ ldd /usr/local/test/lib/perl5/site_perl/5.12.1/sun4-solaris/auto/Syb
+ase/CTlib/CTlib.so
        libct.so =>      /local/sybase/sdk1251/OCS-12_5/lib//libct.so
...
        libgen.so.1 =>   /lib/libgen.so.1
        /platform/SUNW,Sun-Fire-V490/lib/libc_psr.so.1
        /platform/SUNW,Sun-Fire-V490/lib/libmd_psr.so.1

#!/usr/local/test/bin/perl  
 
...
use Sybase::Simple; 
 
exit;