Re[2]: regexp после regexp в perl

[Domrachev Ivan]

Здравствуйте, Igor.

>> если cделать внутри perl_module один regexp, потом использовать
> Прилагаемый патч должен помочь.

Спасибо!
Во первых прошу простить. недоглядел.
писал, что
> теряются переменные
это не так. переменные не потерялись. просто они:
1 не отображаются в вгете
2 не отображаются в дебаге (!)
причина такая:
        0x0040:  204f 4b0d 0a53 6572 7665 723a 206e 6769  .OK..Server:.ngi
        0x0050:  6e78 2f30 2e36 2e31 370d 0a44 6174 653a  nx/0.6.17..Date:
        0x0060:  204d 6f6e 2c20 3130 2044 6563 2032 3030  .Mon,.10.Dec.200
        0x0070:  3720 3037 3a32 383a 3036 2047 4d54 0d0a  7.07:28:06.GMT..
        0x0080:  436f 6e74 656e 742d 5479 7065 3a20 7465  Content-Type:.te
        0x0090:  7874 2f68 746d 6c0d 0a43 6f6e 7465 6e74  xt/html..Content
        0x00a0:  2d4c 656e 6774 683a 2032 0d0a 4c61 7374  -Length:.2..Last
        0x00b0:  2d4d 6f64 6966 6965 643a 2054 6875 2c20  -Modified:.Thu,.
        0x00c0:  3239 204e 6f76 2032 3030 3720 3037 3a31  29.Nov.2007.07:1
        0x00d0:  323a 3137 2047 4d54 0d0a 436f 6e6e 6563  2:17.GMT..Connec
        0x00e0:  7469 6f6e 3a20 6b65 6570 2d61 6c69 7665  tion:.keep-alive
        0x00f0:  0d0a 7465 7374 5f73 313a 202f 3100 0d0a  ..test_s1:./1...
                                                 ^^
        0x0100:  7465 7374 5f73 323a 2032 3300 0d0a 7465  test_s2:.23...te
                                            ^^
        0x0110:  7374 5f73 333a 202f 310d 0a74 6573 745f  st_s3:./1..test_
        0x0120:  7334 3a20 3233 0d0a 7465 7374 5f72 6573  s4:.23..test_res
        0x0130:  756c 743a 2031 0d0a 4163 6365 7074 2d52  ult:.1..Accept-R
        0x0140:  616e 6765 733a 2062 7974 6573 0d0a 0d0a  anges:.bytes....
        0x0150:  3829                                     8)

т.е. в переменных получался нулевой байт и весь последующий вывод в
дебаге отсекался:
2007/12/10 07:36:24 [debug] 54285#0: *175 HTTP/1.1 200 OK
Server: nginx/0.6.17
Date: Mon, 10 Dec 2007 07:36:24 GMT
Content-Type: text/html
Content-Length: 2
Last-Modified: Thu, 29 Nov 2007 07:12:17 GMT
Connection: keep-alive
test_s1: /1

2007/12/10 07:36:24 [debug] 54285#0: *175 write new buf t:1 f:0 0826C61C, pos 0826C61C, size: 284 file: 0, size: 0

как понимаю после первого регекспа сохранилась длинна переменных (но
не значение), а после второго содержимое $1 и $2 затёрлось.

во вторых патч не помог: ни чего не изменилось. в дебаге:
# cat error.log |grep perl
2007/12/10 07:42:40 [debug] 61821#0: *2 perl variable handler
2007/12/10 07:42:40 [debug] 61821#0: *2 perl variable done


-- 
С уважением,
 Domrachev                          mailto:Domrachev.Ivan at gmail.com