Perl5.8 сыпанулся

[Mox]

Код: Выделить всё

FreeBSD 7.1, i386, perl v5.8.9 built for i386-freebsd-thread-multi-64int

Взял пример из википедии

Код: Выделить всё

# perl -wle '(1 x $_) !~ /^(11+)\1+$/ && print while ++ $_'
1
2
3
5
7
...
2719
2729
2731
2741
Segmentation fault (core dumped)

изначально собирался с указанием типа проца в make.conf (больше ничего не указывал), но после этого попробовал пересобрать без. Те же грабли. Ставился со всеми доступными опциями из портов.
Машина тестовая и вроде все работает, но вот как-то чувствую что эта трабла где-нить да вылезет.
gdb и bt я еще не умею пользоваться, зелен. Крашится именно на 2741

[Хостинг HostFood.ru]

Тарифы на хостинг в России, от 12 рублей: https://www.host-food.ru/tariffs/hosting/
Тарифы на виртуальные сервера (VPS/VDS/KVM) в РФ, от 189 руб.: https://www.host-food.ru/tariffs/virtualny-server-vps/
Выделенные сервера, Россия, Москва, от 2000 рублей (HP Proliant G5, Intel Xeon E5430 (2.66GHz, Quad-Core, 12Mb), 8Gb RAM, 2x300Gb SAS HDD, P400i, 512Mb, BBU):
https://www.host-food.ru/tariffs/vydelennyi-server-ds/
Недорогие домены в популярных зонах: https://www.host-food.ru/domains/

[zingel]

Код: Выделить всё

perl -e 'use ExtUtils::Installed;$installed = \
ExtUtils::Installed->new();foreach $module ($installed->modules()){printf  \
"Module:%s\t\tVersion: %s\n", $module, $installed->version($module);}' - && perl -V

[Mox]

Код: Выделить всё

Module:Bundle::NetSNMP          Version:
Module:DBD::mysql               Version: 4.010
Module:DBI              Version: 1.607
Module:Locale::gettext          Version: 1.05
Module:Perl             Version: 5.8.9
Module:Storable         Version: 2.18
Summary of my perl5 (revision 5 version 8 subversion 9) configuration:
  Platform:
    osname=freebsd, osvers=7.1-release-p4, archname=i386-freebsd-thread-multi-64int
    uname='freebsd timbsd 7.1-release-p4 freebsd 7.1-release-p4 #0: wed apr 15 14:27:31 msd 2009 root@timbsd:usrobjusrsrcsystimbsd i386 '
    config_args='-sde -Dprefix=/usr/local -Darchlib=/usr/local/lib/perl5/5.8.9/mach -Dprivlib=/usr/local/lib/perl5/5.8.9 -Dman3dir=/usr/local/lib/perl5/5.8.9/perl/man/man3 -Dman1dir=/usr/local/man/man1 -Dsitearch=/usr/local/lib/perl5/site_perl/5.8.9/mach -Dsitelib=/usr/local/lib/perl5/site_perl/5.8.9 -Dscriptdir=/usr/local/bin -Dsiteman3dir=/usr/local/lib/perl5/5.8.9/man/man3 -Dsiteman1dir=/usr/local/man/man1 -Ui_malloc -Ui_iconv -Uinstallusrbinperl -Dcc=cc -Duseshrplib -Dinc_version_list=none -Dccflags=-DAPPLLIB_EXP="/usr/local/lib/perl5/5.8.9/BSDPAN" -Doptimize=-g -DDEBUGGING -Dd_dosuid=define -Di_gdbm -Dusethreads=y -Dusemymalloc=n -Duse64bitint -Dusesitecustomize'
    hint=recommended, useposix=true, d_sigaction=define
    usethreads=define use5005threads=undef useithreads=define usemultiplicity=define
    useperlio=define d_sfio=undef uselargefiles=define usesocks=undef
    use64bitint=define use64bitall=undef uselongdouble=undef
    usemymalloc=n, bincompat5005=undef
  Compiler:
    cc='cc', ccflags ='-DAPPLLIB_EXP="/usr/local/lib/perl5/5.8.9/BSDPAN" -DHAS_FPSETMASK -DHAS_FLOATINGPOINT_H -DDEBUGGING -fno-strict-aliasing -pipe -I/usr/local/include',
    optimize='-g',
    cppflags='-DAPPLLIB_EXP="/usr/local/lib/perl5/5.8.9/BSDPAN" -DHAS_FPSETMASK -DHAS_FLOATINGPOINT_H -DDEBUGGING -fno-strict-aliasing -pipe -I/usr/local/include'
    ccversion='', gccversion='4.2.1 20070719  [FreeBSD]', gccosandvers=''
    intsize=4, longsize=4, ptrsize=4, doublesize=8, byteorder=12345678
    d_longlong=define, longlongsize=8, d_longdbl=define, longdblsize=12
    ivtype='long long', ivsize=8, nvtype='double', nvsize=8, Off_t='off_t', lseeksize=8
    alignbytes=4, prototype=define
  Linker and Libraries:
    ld='cc', ldflags ='-pthread -Wl,-E  -L/usr/local/lib'
    libpth=/usr/lib /usr/local/lib
    libs=-lgdbm -lm -lcrypt -lutil
    perllibs=-lm -lcrypt -lutil
    libc=, so=so, useshrplib=true, libperl=libperl.so
    gnulibc_version=''
  Dynamic Linking:
    dlsrc=dl_dlopen.xs, dlext=so, d_dlsymun=undef, ccdlflags='  -Wl,-R/usr/local/lib/perl5/5.8.9/mach/CORE'
    cccdlflags='-DPIC -fPIC', lddlflags='-shared  -L/usr/local/lib'


Characteristics of this binary (from libperl):
  Compile-time options: DEBUGGING MULTIPLICITY PERL_IMPLICIT_CONTEXT
                        PERL_MALLOC_WRAP USE_64_BIT_INT USE_FAST_STDIO
                        USE_ITHREADS USE_LARGE_FILES USE_PERLIO
                        USE_REENTRANT_API USE_SITECUSTOMIZE
  Locally applied patches:
        defined-or
  Built under freebsd
  Compiled at Apr 15 2009 16:13:54
  @INC:
    /usr/local/lib/perl5/5.8.9/BSDPAN
    /usr/local/lib/perl5/site_perl/5.8.9/mach
    /usr/local/lib/perl5/site_perl/5.8.9
    /usr/local/lib/perl5/5.8.9/mach
    /usr/local/lib/perl5/5.8.9
    .

[Mox]

работает, если собирать без опции
[ ] THREADS Build threaded perl

=(

[zingel]

а без тредов никак я не пойму?

[Mox]

а без тредов никак я не пойму?

как) т.е. можно. Просто везде, где я собирал perl с тредами он сыпался) немножко на разных цифрах, но все равно сыпался.
Только что попробовал на 7.2 amd64 - та же фигня.

[zingel]

ну вообще мультитредный саппорт в STABLE будет только в RELEASE-p1~2 так что немного подожди и будут тебе треды.