Re: 5.10.0 regex slowdown

/local/perl-5.10/bin/perl5.10.0 p.pl  -s 668954.p10 -S=1e6 -N=13104 | 
+wc -l
Trying 1000 probes with perl 5.010000 at p.pl line 24.
1203558362 at p.pl line 26.
1203558364 at p.pl line 33.
28418

/local/perl-5.10/bin/perl5.10.0 p.pl -s 668954.p10 -S=1e6 -N=13105 | w
+c -l
Trying 1000 probes with perl 5.010000 at p.pl line 24.
1203558405 at p.pl line 26.
1203558407 at p.pl line 33.
28418
[download]

...with Perl 5.10 on CentOS5 (GNU/Linux) 64-bit x86 ...

Summary of my perl5 (revision 5 version 10 subversion 0) configuration
+:
  Platform:
    osname=linux, osvers=2.6.18-8.1.1.el5, archname=x86_64-linux
    uname='linux scubadev 2.6.18-8.1.1.el5 #1 smp mon apr 9 09:43:24 e
+dt 2007 x86_64 x86_64 x86_64 gnulinux '
    config_args='-des -Dprefix=/local/perl-5.10 -Duserelocatableinc'
    hint=recommended, useposix=true, d_sigaction=define
    useithreads=undef, usemultiplicity=undef
    useperlio=define, d_sfio=undef, uselargefiles=define, usesocks=und
+ef
    use64bitint=define, use64bitall=define, uselongdouble=undef
    usemymalloc=n, bincompat5005=undef
  Compiler:
    cc='cc', ccflags ='-fno-strict-aliasing -pipe -I/usr/local/include
+ -D_LARGEFILE_SOURCE -D_FILE_OFFSET_BITS=64',
    optimize='-O2',
    cppflags='-fno-strict-aliasing -pipe -I/usr/local/include'
    ccversion='', gccversion='4.1.1 20070105 (Red Hat 4.1.1-52)', gcco
+sandvers=''
    intsize=4, longsize=8, ptrsize=8, doublesize=8, byteorder=12345678
    d_longlong=define, longlongsize=8, d_longdbl=define, longdblsize=1
+6
    ivtype='long', ivsize=8, nvtype='double', nvsize=8, Off_t='off_t',
+ lseeksize=8
    alignbytes=8, prototype=define
  Linker and Libraries:
    ld='cc', ldflags =' -L/usr/local/lib'
    libpth=/usr/local/lib /lib /usr/lib /lib64 /usr/lib64
    libs=-lnsl -ldb -ldl -lm -lcrypt -lutil -lc
    perllibs=-lnsl -ldl -lm -lcrypt -lutil -lc
    libc=/lib/libc-2.5.so, so=so, useshrplib=false, libperl=libperl.a
    gnulibc_version='2.5'
  Dynamic Linking:
    dlsrc=dl_dlopen.xs, dlext=so, d_dlsymun=undef, ccdlflags='-Wl,-E'
    cccdlflags='-fPIC', lddlflags='-shared -O2 -L/usr/local/lib'


Characteristics of this binary (from libperl):
  Compile-time options: PERL_DONT_CREATE_GVSV PERL_MALLOC_WRAP USE_64_
+BIT_ALL
                        USE_64_BIT_INT USE_LARGE_FILES USE_PERLIO
  Built under linux
  Compiled at Dec 18 2007 15:59:48
  %ENV:
    PERL5LIB=""
  @INC:
    /local/perl-5.10/lib/5.10.0/x86_64-linux
    /local/perl-5.10/lib/5.10.0
    /local/perl-5.10/lib/site_perl/5.10.0/x86_64-linux
    /local/perl-5.10/lib/site_perl/5.10.0
[download]

Comment on Re: 5.10.0 regex slowdown Select or Download Code

Replies are listed 'Best First'.
Re^2: 5.10.0 regex slowdown by BrowserUk (Patriarch) on Feb 21, 2008 at 01:57 UTC
/local/perl-5.10/bin/perl5.10.0 p.pl -s 668954.p10 -S=1e6 -N=13104 \| wc -l The -s should come before the script name, which in my example was 668944.p10. Eg. If you've named the script `p.pl`, you should use: `/local/perl-5.10/bin/perl5.10.0 -s p.pl -S=1e6 -N=13104 \| wc -l` [download] The clue is on the first line of the output: `Trying 1000 probes with ...` Examine what is said, not who speaks -- Silence betokens consent -- Love the truth but pardon error. "Science is about questioning the status quo. Questioning authority". In the absence of evidence, opinion is indistinguishable from prejudice. "Too many [] have been sedated by an oppressive environment of political correctness and risk aversion."	[reply] [d/l] [select]
Re^3: 5.10.0 regex slowdown by parv (Parson) on Feb 21, 2008 at 03:43 UTC
'1000' did seem suspicious along with '668954.p10' value, but I did not care to investigate any further (near blind copy & pasto, baby). Sorry for the useless data point. After starting the program correctly ... `Trying 13104 probes with perl 5.010000 at q.pl line 19. 1203567383 at q.pl line 21. 1203567386 at q.pl line 28. 11376 Trying 13105 probes with perl 5.010000 at q.pl line 19. 1203565007 at q.pl line 21. 1203565331 at q.pl line 28. 11377` [download]	[reply] [d/l]