develooper Front page | perl.perl5.porters | Postings from December 2013

[perl #38712] Threads calling LWP causes exception

From:
bulk88 via RT
Date:
December 24, 2013 09:00
Subject:
[perl #38712] Threads calling LWP causes exception
Message ID:
rt-4.0.18-31772-1387875635-271.38712-15-0@perl.org
On Mon Apr 17 20:08:20 2006, hartct wrote:
> I can duplicate this on Fedora Core 4 as well.  Updated platforms to
> include Win32 and Linux. 

Can not reproduce.
------------------------------------------------------------------
C:\Documents and Settings\Administrator\Desktop>perl -V
Summary of my perl5 (revision 5 version 16 subversion 3) configuration:

  Platform:
    osname=MSWin32, osvers=5.2, archname=MSWin32-x86-multi-thread
    uname=''
    config_args='undef'
    hint=recommended, useposix=true, d_sigaction=undef
    useithreads=define, usemultiplicity=define
    useperlio=define, d_sfio=undef, uselargefiles=define, usesocks=undef
    use64bitint=undef, use64bitall=undef, uselongdouble=undef
    usemymalloc=n, bincompat5005=undef
  Compiler:
    cc='cl', ccflags ='-nologo -GF -W3 -MD -Zi -DNDEBUG -O1 -DWIN32 -D_CONSOLE -
DNO_STRICT -DPERL_TEXTMODE_SCRIPTS -DUSE_SITECUSTOMIZE -DPERL_IMPLICIT_CONTEXT -
DPERL_IMPLICIT_SYS -DUSE_PERLIO -D_USE_32BIT_TIME_T',
    optimize='-MD -Zi -DNDEBUG -O1',
    cppflags='-DWIN32'
    ccversion='15.0.30729', gccversion='', gccosandvers=''
    intsize=4, longsize=4, ptrsize=4, doublesize=8, byteorder=1234
    d_longlong=undef, longlongsize=8, d_longdbl=define, longdblsize=8
    ivtype='long', ivsize=4, nvtype='double', nvsize=8, Off_t='__int64', lseeksi
ze=8
    alignbytes=8, prototype=define
  Linker and Libraries:
    ld='link', ldflags ='-nologo -nodefaultlib -debug -opt:ref,icf  -libpath:"C:
\Perl3216\lib\CORE"  -machine:x86'
    libpth=\lib
    libs=oldnames.lib kernel32.lib user32.lib gdi32.lib winspool.lib  comdlg32.l
ib advapi32.lib shell32.lib ole32.lib oleaut32.lib  netapi32.lib uuid.lib ws2_32
.lib mpr.lib winmm.lib  version.lib odbc32.lib odbccp32.lib comctl32.lib msvcrt.
lib
    perllibs=oldnames.lib kernel32.lib user32.lib gdi32.lib winspool.lib  comdlg
32.lib advapi32.lib shell32.lib ole32.lib oleaut32.lib  netapi32.lib uuid.lib ws
2_32.lib mpr.lib winmm.lib  version.lib odbc32.lib odbccp32.lib comctl32.lib msv
crt.lib
    libc=msvcrt.lib, so=dll, useshrplib=true, libperl=perl516.lib
    gnulibc_version=''
  Dynamic Linking:
    dlsrc=dl_win32.xs, dlext=dll, d_dlsymun=undef, ccdlflags=' '
    cccdlflags=' ', lddlflags='-dll -nologo -nodefaultlib -debug -opt:ref,icf  -
libpath:"C:\Perl3216\lib\CORE"  -machine:x86'


Characteristics of this binary (from libperl):
  Compile-time options: HAS_TIMES HAVE_INTERP_INTERN MULTIPLICITY
                        PERLIO_LAYERS PERL_DONT_CREATE_GVSV
                        PERL_IMPLICIT_CONTEXT PERL_IMPLICIT_SYS
                        PERL_MALLOC_WRAP PERL_PRESERVE_IVUV PL_OP_SLAB_ALLOC
                        USE_ITHREADS USE_LARGE_FILES USE_LOCALE
                        USE_LOCALE_COLLATE USE_LOCALE_CTYPE
                        USE_LOCALE_NUMERIC USE_PERLIO USE_PERL_ATOF
                        USE_SITECUSTOMIZE
  Locally applied patches:
        ActivePerl Build 1603 [296746]
  Built under MSWin32
  Compiled at Mar 13 2013 11:29:21
  %ENV:
    PERL_JSON_BACKEND="JSON::XS"
    PERL_YAML_BACKEND="YAML"
  @INC:
    C:/Perl3216/site/lib
    C:/Perl3216/lib
    .

C:\Documents and Settings\Administrator\Desktop>perl -MLWP::Simple -E"say $LWP::
Simple::VERSION"
6.00

C:\Documents and Settings\Administrator\Desktop>perl -MCrypt::SSLeay -E"say $Cry
pt::SSLeay::VERSION"
Can't locate Crypt/SSLeay.pm in @INC (@INC contains: C:/Perl3216/site/lib C:/Per
l3216/lib .).
BEGIN failed--compilation aborted.

C:\Documents and Settings\Administrator\Desktop>perl -MNet::SSLeay -E"say $Net::
SSLeay::VERSION"
1.52

C:\Documents and Settings\Administrator\Desktop>
---------------------------------------------------------
C:\Documents and Settings\Administrator\Desktop>perl n1.pl https://www.google.co
m/
-----------------------------------------------------
now with print GetIt2( $ARGV[ 0 ] );
-----------------------------------------------------
C:\Documents and Settings\Administrator\Desktop>perl n1.pl https://www.google.co
m/
<!doctype html><html itemscope="" itemtype="http://schema.org/WebPage"><head><me
ta content="Search the world's information, including webpages, images, videos a
nd more. Google has many special features to help you find exactly what you're l
ooking for." name="description"><meta content="noodp" name="robots"><meta itempr
op="image" content="/images/google_favicon_128.png"><title>Google</title><script
>(function(){
**************cut*****************
p=d;void 0!==google.stt&&(google.kCSI.stt=google.stt);google.csiReport&&google.c
siReport()}}window.addEventListener?window.addEventListener("load",n,!1):window.
attachEvent&&window.attachEvent("onload",n);google.timers.load.t.prt=e=(new Date
).getTime();})();
</script></body></html>
C:\Documents and Settings\Administrator\Desktop>
-------------------------------------------------------

-- 
bulk88 ~ bulk88 at hotmail.com

---
via perlbug:  queue: perl5 status: open
https://rt.perl.org/Ticket/Display.html?id=38712



nntp.perl.org: Perl Programming lists via nntp and http.
Comments to Ask Bjørn Hansen at ask@perl.org | Group listing | About