|
|
sybperl-l Archive
Up Prev Next
From: "WORENKLEIN, David, GCM" <David dot Worenklein at gcm dot com>
Subject: Perl 5.6.1 under XP crashes (SEGV) when calling dbpoll(undef,0)
Date: Apr 10 2002 4:14PM
I am running ActivePerl 631 (Perl 5.6.1), and sybperl 2.14. Perl build
details are at the end.
Sybase::DBlib::dbpoll(c:/Perl/lib/Carp.pm:97):
97: { local $@; require Carp::Heavy; } # XXX fix require to not
clear $@?
Sybase::DBlib::dbpoll(c:/Perl/lib/Carp.pm:97):
97: { local $@; require Carp::Heavy; } # XXX fix require to not
clear $@?
Sybase::DBlib::dbpoll(c:/Perl/lib/Carp.pm:97):
97: { local $@; require Carp::Heavy; } # XXX fix require to not
clear $@?
Sybase::DBlib::dbpoll(c:/Perl/lib/Carp.pm:98):
98: goto &longmess_heavy;
Carp::longmess_heavy(c:/Perl/lib/Carp/Heavy.pm:30):
30: return @_ if ref $_[0];
Carp::longmess_heavy(c:/Perl/lib/Carp/Heavy.pm:31):
31: my $error = join '', @_;
Carp::longmess_heavy(c:/Perl/lib/Carp/Heavy.pm:32):
32: my $mess = "";
Carp::longmess_heavy(c:/Perl/lib/Carp/Heavy.pm:33):
33: my $i = 1 + $CarpLevel;
Carp::longmess_heavy(c:/Perl/lib/Carp/Heavy.pm:34):
34: my ($pack,$file,$line,$sub,$hargs,$eval,$require);
Carp::longmess_heavy(c:/Perl/lib/Carp/Heavy.pm:35):
35: my (@a);
Carp::longmess_heavy(c:/Perl/lib/Carp/Heavy.pm:39):
39: while (do { { package DB; @a = caller($i++) } } ) {
Carp::longmess_heavy(c:/Perl/lib/Carp/Heavy.pm:39):
39: while (do { { package DB; @a = caller($i++) } } ) {
Carp::longmess_heavy(c:/Perl/lib/Carp/Heavy.pm:41):
41: ($pack,$file,$line,$sub,$hargs,undef,$eval,$require) = @a;
Carp::longmess_heavy(c:/Perl/lib/Carp/Heavy.pm:56):
56: if ($error =~ m/\n\z/) {
Carp::longmess_heavy(c:/Perl/lib/Carp/Heavy.pm:61):
61: if (defined $eval) {
Carp::longmess_heavy(c:/Perl/lib/Carp/Heavy.pm:77):
77: if ($hargs) {
Carp::longmess_heavy(c:/Perl/lib/Carp/Heavy.pm:79):
79: @a = @DB::args; # must get local copy of args
Carp::longmess_heavy(c:/Perl/lib/Carp/Heavy.pm:81):
81: if ($MaxArgNums and @a > $MaxArgNums) {
Carp::longmess_heavy(c:/Perl/lib/Carp/Heavy.pm:86):
86: for (@a) {
Carp::longmess_heavy(c:/Perl/lib/Carp/Heavy.pm:88):
88: $_ = "undef", next unless defined $_;
Carp::longmess_heavy(c:/Perl/lib/Carp/Heavy.pm:89):
89: if (ref $_) {
Carp::longmess_heavy(c:/Perl/lib/Carp/Heavy.pm:91):
91: $_ .= '';
Carp::longmess_heavy(c:/Perl/lib/Carp/Heavy.pm:92):
92: s/'/\\'/g;
Carp::longmess_heavy(c:/Perl/lib/Carp/Heavy.pm:101):
101: $_ = "'$_'" unless /^-?[\d.]+$/;
Carp::longmess_heavy(c:/Perl/lib/Carp/Heavy.pm:103):
103:
s/([\200-\377])/sprintf("M-%c",ord($1)&0177)/eg;
Carp::longmess_heavy(c:/Perl/lib/Carp/Heavy.pm:105):
105: s/([\0-\37\177])/sprintf("^%c",ord($1)^64)/eg;
Carp::longmess_heavy(c:/Perl/lib/Carp/Heavy.pm:86):
86: for (@a) {
Carp::longmess_heavy(c:/Perl/lib/Carp/Heavy.pm:108):
108: $sub .= '(' . join(', ', @a) . ')';
Carp::longmess_heavy(c:/Perl/lib/Carp/Heavy.pm:111):
111: $mess .= "\t$sub " if $error eq "called";
Carp::longmess_heavy(c:/Perl/lib/Carp/Heavy.pm:112):
112: $mess .= "$error at $file line $line";
Carp::longmess_heavy(c:/Perl/lib/Carp/Heavy.pm:113):
113: if (defined &Thread::tid) {
Carp::longmess_heavy(c:/Perl/lib/Carp/Heavy.pm:117):
117: $mess .= "\n";
Carp::longmess_heavy(c:/Perl/lib/Carp/Heavy.pm:122):
122: $error = "called";
Carp::longmess_heavy(c:/Perl/lib/Carp/Heavy.pm:39):
39: while (do { { package DB; @a = caller($i++) } } ) {
Carp::longmess_heavy(c:/Perl/lib/Carp/Heavy.pm:39):
39: while (do { { package DB; @a = caller($i++) } } ) {
Carp::longmess_heavy(c:/Perl/lib/Carp/Heavy.pm:41):
41: ($pack,$file,$line,$sub,$hargs,undef,$eval,$require) = @a;
Carp::longmess_heavy(c:/Perl/lib/Carp/Heavy.pm:56):
56: if ($error =~ m/\n\z/) {
Carp::longmess_heavy(c:/Perl/lib/Carp/Heavy.pm:61):
61: if (defined $eval) {
Carp::longmess_heavy(c:/Perl/lib/Carp/Heavy.pm:77):
77: if ($hargs) {
Carp::longmess_heavy(c:/Perl/lib/Carp/Heavy.pm:79):
79: @a = @DB::args; # must get local copy of args
Carp::longmess_heavy(c:/Perl/lib/Carp/Heavy.pm:81):
81: if ($MaxArgNums and @a > $MaxArgNums) {
Carp::longmess_heavy(c:/Perl/lib/Carp/Heavy.pm:86):
86: for (@a) {
Carp::longmess_heavy(c:/Perl/lib/Carp/Heavy.pm:88):
88: $_ = "undef", next unless defined $_;
Carp::longmess_heavy(c:/Perl/lib/Carp/Heavy.pm:89):
89: if (ref $_) {
Carp::longmess_heavy(c:/Perl/lib/Carp/Heavy.pm:95):
95: s/'/\\'/g;
Carp::longmess_heavy(c:/Perl/lib/Carp/Heavy.pm:97):
97: substr($_,$MaxArgLen) = '...'
98: if $MaxArgLen and $MaxArgLen < length;
Carp::longmess_heavy(c:/Perl/lib/Carp/Heavy.pm:101):
101: $_ = "'$_'" unless /^-?[\d.]+$/;
Carp::longmess_heavy(c:/Perl/lib/Carp/Heavy.pm:103):
103:
s/([\200-\377])/sprintf("M-%c",ord($1)&0177)/eg;
Carp::longmess_heavy(c:/Perl/lib/Carp/Heavy.pm:105):
105: s/([\0-\37\177])/sprintf("^%c",ord($1)^64)/eg;
Carp::longmess_heavy(c:/Perl/lib/Carp/Heavy.pm:86):
86: for (@a) {
Carp::longmess_heavy(c:/Perl/lib/Carp/Heavy.pm:108):
108: $sub .= '(' . join(', ', @a) . ')';
Carp::longmess_heavy(c:/Perl/lib/Carp/Heavy.pm:111):
111: $mess .= "\t$sub " if $error eq "called";
Carp::longmess_heavy(c:/Perl/lib/Carp/Heavy.pm:112):
112: $mess .= "$error at $file line $line";
Carp::longmess_heavy(c:/Perl/lib/Carp/Heavy.pm:113):
113: if (defined &Thread::tid) {
Carp::longmess_heavy(c:/Perl/lib/Carp/Heavy.pm:117):
117: $mess .= "\n";
Carp::longmess_heavy(c:/Perl/lib/Carp/Heavy.pm:122):
122: $error = "called";
Carp::longmess_heavy(c:/Perl/lib/Carp/Heavy.pm:39):
39: while (do { { package DB; @a = caller($i++) } } ) {
Carp::longmess_heavy(c:/Perl/lib/Carp/Heavy.pm:39):
39: while (do { { package DB; @a = caller($i++) } } ) {
Carp::longmess_heavy(c:/Perl/lib/Carp/Heavy.pm:41):
41: ($pack,$file,$line,$sub,$hargs,undef,$eval,$require) = @a;
Carp::longmess_heavy(c:/Perl/lib/Carp/Heavy.pm:56):
56: if ($error =~ m/\n\z/) {
Carp::longmess_heavy(c:/Perl/lib/Carp/Heavy.pm:61):
61: if (defined $eval) {
Carp::longmess_heavy(c:/Perl/lib/Carp/Heavy.pm:77):
77: if ($hargs) {
Carp::longmess_heavy(c:/Perl/lib/Carp/Heavy.pm:79):
79: @a = @DB::args; # must get local copy of args
Carp::longmess_heavy(c:/Perl/lib/Carp/Heavy.pm:81):
81: if ($MaxArgNums and @a > $MaxArgNums) {
Carp::longmess_heavy(c:/Perl/lib/Carp/Heavy.pm:86):
86: for (@a) {
Carp::longmess_heavy(c:/Perl/lib/Carp/Heavy.pm:88):
88: $_ = "undef", next unless defined $_;
Carp::longmess_heavy(c:/Perl/lib/Carp/Heavy.pm:89):
89: if (ref $_) {
Carp::longmess_heavy(c:/Perl/lib/Carp/Heavy.pm:91):
91: $_ .= '';
Carp::longmess_heavy(c:/Perl/lib/Carp/Heavy.pm:92):
92: s/'/\\'/g;
Carp::longmess_heavy(c:/Perl/lib/Carp/Heavy.pm:101):
101: $_ = "'$_'" unless /^-?[\d.]+$/;
Carp::longmess_heavy(c:/Perl/lib/Carp/Heavy.pm:103):
103:
s/([\200-\377])/sprintf("M-%c",ord($1)&0177)/eg;
Carp::longmess_heavy(c:/Perl/lib/Carp/Heavy.pm:105):
105: s/([\0-\37\177])/sprintf("^%c",ord($1)^64)/eg;
Carp::longmess_heavy(c:/Perl/lib/Carp/Heavy.pm:86):
86: for (@a) {
Carp::longmess_heavy(c:/Perl/lib/Carp/Heavy.pm:88):
88: $_ = "undef", next unless defined $_;
Carp::longmess_heavy(c:/Perl/lib/Carp/Heavy.pm:89):
89: if (ref $_) {
Carp::longmess_heavy(c:/Perl/lib/Carp/Heavy.pm:95):
95: s/'/\\'/g;
Carp::longmess_heavy(c:/Perl/lib/Carp/Heavy.pm:97):
97: substr($_,$MaxArgLen) = '...'
98: if $MaxArgLen and $MaxArgLen < length;
Carp::longmess_heavy(c:/Perl/lib/Carp/Heavy.pm:101):
101: $_ = "'$_'" unless /^-?[\d.]+$/;
Carp::longmess_heavy(c:/Perl/lib/Carp/Heavy.pm:103):
103:
s/([\200-\377])/sprintf("M-%c",ord($1)&0177)/eg;
Carp::longmess_heavy(c:/Perl/lib/Carp/Heavy.pm:105):
105: s/([\0-\37\177])/sprintf("^%c",ord($1)^64)/eg;
Carp::longmess_heavy(c:/Perl/lib/Carp/Heavy.pm:86):
86: for (@a) {
Carp::longmess_heavy(c:/Perl/lib/Carp/Heavy.pm:88):
88: $_ = "undef", next unless defined $_;
Carp::longmess_heavy(c:/Perl/lib/Carp/Heavy.pm:89):
89: if (ref $_) {
Carp::longmess_heavy(c:/Perl/lib/Carp/Heavy.pm:95):
95: s/'/\\'/g;
Carp::longmess_heavy(c:/Perl/lib/Carp/Heavy.pm:97):
97: substr($_,$MaxArgLen) = '...'
98: if $MaxArgLen and $MaxArgLen < length;
Carp::longmess_heavy(c:/Perl/lib/Carp/Heavy.pm:101):
101: $_ = "'$_'" unless /^-?[\d.]+$/;
Carp::longmess_heavy(c:/Perl/lib/Carp/Heavy.pm:103):
103:
s/([\200-\377])/sprintf("M-%c",ord($1)&0177)/eg;
Carp::longmess_heavy(c:/Perl/lib/Carp/Heavy.pm:105):
105: s/([\0-\37\177])/sprintf("^%c",ord($1)^64)/eg;
Carp::longmess_heavy(c:/Perl/lib/Carp/Heavy.pm:105):
105: s/([\0-\37\177])/sprintf("^%c",ord($1)^64)/eg;
Carp::longmess_heavy(c:/Perl/lib/Carp/Heavy.pm:105):
105: s/([\0-\37\177])/sprintf("^%c",ord($1)^64)/eg;
Carp::longmess_heavy(c:/Perl/lib/Carp/Heavy.pm:105):
105: s/([\0-\37\177])/sprintf("^%c",ord($1)^64)/eg;
Carp::longmess_heavy(c:/Perl/lib/Carp/Heavy.pm:86):
86: for (@a) {
Carp::longmess_heavy(c:/Perl/lib/Carp/Heavy.pm:88):
88: $_ = "undef", next unless defined $_;
Carp::longmess_heavy(c:/Perl/lib/Carp/Heavy.pm:89):
89: if (ref $_) {
Carp::longmess_heavy(c:/Perl/lib/Carp/Heavy.pm:95):
95: s/'/\\'/g;
Carp::longmess_heavy(c:/Perl/lib/Carp/Heavy.pm:97):
97: substr($_,$MaxArgLen) = '...'
98: if $MaxArgLen and $MaxArgLen < length;
Carp::longmess_heavy(c:/Perl/lib/Carp/Heavy.pm:101):
101: $_ = "'$_'" unless /^-?[\d.]+$/;
Carp::longmess_heavy(c:/Perl/lib/Carp/Heavy.pm:103):
103:
s/([\200-\377])/sprintf("M-%c",ord($1)&0177)/eg;
Carp::longmess_heavy(c:/Perl/lib/Carp/Heavy.pm:105):
105: s/([\0-\37\177])/sprintf("^%c",ord($1)^64)/eg;
Carp::longmess_heavy(c:/Perl/lib/Carp/Heavy.pm:86):
86: for (@a) {
Carp::longmess_heavy(c:/Perl/lib/Carp/Heavy.pm:88):
88: $_ = "undef", next unless defined $_;
Carp::longmess_heavy(c:/Perl/lib/Carp/Heavy.pm:89):
89: if (ref $_) {
Carp::longmess_heavy(c:/Perl/lib/Carp/Heavy.pm:91):
91: $_ .= '';
Carp::longmess_heavy(c:/Perl/lib/Carp/Heavy.pm:92):
92: s/'/\\'/g;
Carp::longmess_heavy(c:/Perl/lib/Carp/Heavy.pm:101):
101: $_ = "'$_'" unless /^-?[\d.]+$/;
Carp::longmess_heavy(c:/Perl/lib/Carp/Heavy.pm:103):
103:
s/([\200-\377])/sprintf("M-%c",ord($1)&0177)/eg;
Carp::longmess_heavy(c:/Perl/lib/Carp/Heavy.pm:105):
105: s/([\0-\37\177])/sprintf("^%c",ord($1)^64)/eg;
Carp::longmess_heavy(c:/Perl/lib/Carp/Heavy.pm:86):
86: for (@a) {
Carp::longmess_heavy(c:/Perl/lib/Carp/Heavy.pm:88):
88: $_ = "undef", next unless defined $_;
Carp::longmess_heavy(c:/Perl/lib/Carp/Heavy.pm:89):
89: if (ref $_) {
Carp::longmess_heavy(c:/Perl/lib/Carp/Heavy.pm:95):
95: s/'/\\'/g;
Carp::longmess_heavy(c:/Perl/lib/Carp/Heavy.pm:97):
97: substr($_,$MaxArgLen) = '...'
98: if $MaxArgLen and $MaxArgLen < length;
Carp::longmess_heavy(c:/Perl/lib/Carp/Heavy.pm:101):
101: $_ = "'$_'" unless /^-?[\d.]+$/;
Carp::longmess_heavy(c:/Perl/lib/Carp/Heavy.pm:103):
103:
s/([\200-\377])/sprintf("M-%c",ord($1)&0177)/eg;
Carp::longmess_heavy(c:/Perl/lib/Carp/Heavy.pm:105):
105: s/([\0-\37\177])/sprintf("^%c",ord($1)^64)/eg;
Carp::longmess_heavy(c:/Perl/lib/Carp/Heavy.pm:86):
86: for (@a) {
Carp::longmess_heavy(c:/Perl/lib/Carp/Heavy.pm:88):
88: $_ = "undef", next unless defined $_;
Carp::longmess_heavy(c:/Perl/lib/Carp/Heavy.pm:89):
89: if (ref $_) {
Carp::longmess_heavy(c:/Perl/lib/Carp/Heavy.pm:91):
91: $_ .= '';
Carp::longmess_heavy(c:/Perl/lib/Carp/Heavy.pm:92):
92: s/'/\\'/g;
Carp::longmess_heavy(c:/Perl/lib/Carp/Heavy.pm:101):
101: $_ = "'$_'" unless /^-?[\d.]+$/;
Carp::longmess_heavy(c:/Perl/lib/Carp/Heavy.pm:103):
103:
s/([\200-\377])/sprintf("M-%c",ord($1)&0177)/eg;
Carp::longmess_heavy(c:/Perl/lib/Carp/Heavy.pm:105):
105: s/([\0-\37\177])/sprintf("^%c",ord($1)^64)/eg;
Carp::longmess_heavy(c:/Perl/lib/Carp/Heavy.pm:86):
86: for (@a) {
Carp::longmess_heavy(c:/Perl/lib/Carp/Heavy.pm:108):
108: $sub .= '(' . join(', ', @a) . ')';
Carp::longmess_heavy(c:/Perl/lib/Carp/Heavy.pm:111):
111: $mess .= "\t$sub " if $error eq "called";
Carp::longmess_heavy(c:/Perl/lib/Carp/Heavy.pm:112):
112: $mess .= "$error at $file line $line";
Carp::longmess_heavy(c:/Perl/lib/Carp/Heavy.pm:113):
113: if (defined &Thread::tid) {
Carp::longmess_heavy(c:/Perl/lib/Carp/Heavy.pm:117):
117: $mess .= "\n";
Carp::longmess_heavy(c:/Perl/lib/Carp/Heavy.pm:122):
122: $error = "called";
Carp::longmess_heavy(c:/Perl/lib/Carp/Heavy.pm:39):
39: while (do { { package DB; @a = caller($i++) } } ) {
Carp::longmess_heavy(c:/Perl/lib/Carp/Heavy.pm:39):
39: while (do { { package DB; @a = caller($i++) } } ) {
Carp::longmess_heavy(c:/Perl/lib/Carp/Heavy.pm:41):
41: ($pack,$file,$line,$sub,$hargs,undef,$eval,$require) = @a;
Carp::longmess_heavy(c:/Perl/lib/Carp/Heavy.pm:56):
56: if ($error =~ m/\n\z/) {
Carp::longmess_heavy(c:/Perl/lib/Carp/Heavy.pm:61):
61: if (defined $eval) {
Carp::longmess_heavy(c:/Perl/lib/Carp/Heavy.pm:77):
77: if ($hargs) {
Carp::longmess_heavy(c:/Perl/lib/Carp/Heavy.pm:79):
79: @a = @DB::args; # must get local copy of args
Carp::longmess_heavy(c:/Perl/lib/Carp/Heavy.pm:81):
81: if ($MaxArgNums and @a > $MaxArgNums) {
Carp::longmess_heavy(c:/Perl/lib/Carp/Heavy.pm:86):
86: for (@a) {
Carp::longmess_heavy(c:/Perl/lib/Carp/Heavy.pm:88):
88: $_ = "undef", next unless defined $_;
Carp::longmess_heavy(c:/Perl/lib/Carp/Heavy.pm:89):
89: if (ref $_) {
Carp::longmess_heavy(c:/Perl/lib/Carp/Heavy.pm:91):
91: $_ .= '';
Carp::longmess_heavy(c:/Perl/lib/Carp/Heavy.pm:92):
92: s/'/\\'/g;
Carp::longmess_heavy(c:/Perl/lib/Carp/Heavy.pm:101):
101: $_ = "'$_'" unless /^-?[\d.]+$/;
Carp::longmess_heavy(c:/Perl/lib/Carp/Heavy.pm:103):
103:
s/([\200-\377])/sprintf("M-%c",ord($1)&0177)/eg;
Carp::longmess_heavy(c:/Perl/lib/Carp/Heavy.pm:105):
105: s/([\0-\37\177])/sprintf("^%c",ord($1)^64)/eg;
Carp::longmess_heavy(c:/Perl/lib/Carp/Heavy.pm:86):
86: for (@a) {
Carp::longmess_heavy(c:/Perl/lib/Carp/Heavy.pm:108):
108: $sub .= '(' . join(', ', @a) . ')';
Carp::longmess_heavy(c:/Perl/lib/Carp/Heavy.pm:111):
111: $mess .= "\t$sub " if $error eq "called";
Carp::longmess_heavy(c:/Perl/lib/Carp/Heavy.pm:112):
112: $mess .= "$error at $file line $line";
Carp::longmess_heavy(c:/Perl/lib/Carp/Heavy.pm:113):
113: if (defined &Thread::tid) {
Carp::longmess_heavy(c:/Perl/lib/Carp/Heavy.pm:117):
117: $mess .= "\n";
Carp::longmess_heavy(c:/Perl/lib/Carp/Heavy.pm:122):
122: $error = "called";
Carp::longmess_heavy(c:/Perl/lib/Carp/Heavy.pm:39):
39: while (do { { package DB; @a = caller($i++) } } ) {
Carp::longmess_heavy(c:/Perl/lib/Carp/Heavy.pm:39):
39: while (do { { package DB; @a = caller($i++) } } ) {
Carp::longmess_heavy(c:/Perl/lib/Carp/Heavy.pm:124):
124: $mess || $error;
Signal SEGV at ...
Summary of my perl5 (revision 5 version 6 subversion 1) configuration:
Platform:
osname=MSWin32, osvers=4.0, archname=MSWin32-x86-multi-thread
uname=''
config_args='undef'
hint=recommended, useposix=true, d_sigaction=undef
usethreads=undef use5005threads=undef useithreads=define
usemultiplicity=define
useperlio=undef d_sfio=undef uselargefiles=undef usesocks=undef
use64bitint=undef use64bitall=undef uselongdouble=undef
Compiler:
cc='cl', ccflags ='-nologo -O1 -MD -DNDEBUG -DWIN32 -D_CONSOLE
-DNO_STRICT -DHAVE_DES_FCRYPT -DPERL_IMPLICIT_CONTEX
T -DPERL_IMPLICIT_SYS -DPERL_MSVCRT_READFIX',
optimize='-O1 -MD -DNDEBUG',
cppflags='-DWIN32'
ccversion='', gccversion='', gccosandvers=''
intsize=4, longsize=4, ptrsize=4, doublesize=8, byteorder=1234
d_longlong=undef, longlongsize=8, d_longdbl=define, longdblsize=10
ivtype='long', ivsize=4, nvtype='double', nvsize=8, Off_t='off_t',
lseeksize=4
alignbytes=8, usemymalloc=n, prototype=define
Linker and Libraries:
ld='link', ldflags ='-nologo -nodefaultlib -release
-libpath:"C:\Perl\lib\CORE" -machine:x86'
libpth="C:\PROGRA~1\MICROS~4\VC98\LIB"
"C:\PROGRA~1\MICROS~4\VC98\MFC\LIB" "C:\Program Files\Microsoft Visual
Studio
.NET\FramorkSDK\Lib" "C:\Program Files\Microsoft Visual Studio
..NET\FrameworkSDK\Lib\" "R:\sybase\12.0\OCS-12_0\lib" "C
:\Perl\lib\CORE"
libs= oldnames.lib kernel32.lib user32.lib gdi32.lib winspool.lib
comdlg32.lib advapi32.lib shell32.lib ole32.lib
oleaut32.lib netapi32.lib uuid.lib wsock32.lib mpr.lib winmm.lib
version.lib odbc32.lib odbccp32.lib msvcrt.lib
perllibs= oldnames.lib kernel32.lib user32.lib gdi32.lib winspool.lib
comdlg32.lib advapi32.lib shell32.lib ole32.
lib oleaut32.lib netapi32.lib uuid.lib wsock32.lib mpr.lib winmm.lib
version.lib odbc32.lib odbccp32.lib msvcrt.lib
libc=msvcrt.lib, so=dll, useshrplib=yes, libperl=perl56.lib
Dynamic Linking:
dlsrc=dl_win32.xs, dlext=dll, d_dlsymun=undef, ccdlflags=' '
cccdlflags=' ', lddlflags='-dll -nologo -nodefaultlib -release
-libpath:"C:\Perl\lib\CORE" -machine:x86'
Characteristics of this binary (from libperl):
Compile-time options: MULTIPLICITY USE_ITHREADS PERL_IMPLICIT_CONTEXT
PERL_IMPLICIT_SYS
Locally applied patches:
ActivePerl Build 631
Built under MSWin32
Compiled at Jan 2 2002 17:16:22
%ENV:
PERL5LIB="\\GSAMB101\nfs_mounts\dev_apps/lib/perl;\\GSAMB101\nfs_mounts\dev
_apps/lib/perl5"
@INC:
\\GSAMB101\nfs_mounts\dev_apps/lib/perl
\\GSAMB101\nfs_mounts\dev_apps/lib/perl5
c:/Perl/lib
R:/Perl/5.6.1/site/lib
c:/Perl/site/lib
.
|
