rename t/pragma/warn-* to t/pragma/warn/*, be 8.3-friendly
[p5sagit/p5-mst-13.2.git] / t / pragma / warn / regexec
1   regexec.c     
2
3   count exceeded %d
4
5         $_ = 'a' x (2**15+1); /^()(a\1)*$/ ;
6   count exceeded %d
7
8         $_ = 'a' x (2**15+1); /^()(a\1)*?$/ ;
9
10 __END__
11 # regexec.c
12 use warning 'unsafe' ;
13 print("SKIPPED\n# win32 can't increase stacksize in shell\n"),exit
14     if $^O eq 'MSWin32';
15 $_ = 'a' x (2**15+1); 
16 /^()(a\1)*$/ ;
17 #
18 # If this test fails with a segmentation violation or similar,
19 # you may have to increase the default stacksize limit in your
20 # shell.  You may need superuser privileges.
21 #
22 # Under the sh, ksh, zsh:
23 #    $ ulimit -s
24 #    8192
25 #    $ ulimit -s 16000
26 #
27 # Under the csh:
28 #    % limit stacksize
29 #    stacksize        8192 kbytes
30 #    % limit stacksize 16000
31 #
32 EXPECT
33 Complex regular subexpression recursion limit (32766) exceeded at - line 6.
34 ########
35 # regexec.c
36 use warning 'unsafe' ;
37 print("SKIPPED\n# win32 can't increase stacksize in shell\n"),exit
38     if $^O eq 'MSWin32';
39 $_ = 'a' x (2**15+1);
40 /^()(a\1)*?$/ ;
41 #
42 # If this test fails with a segmentation violation or similar,
43 # you may have to increase the default stacksize limit in your
44 # shell.  You may need superuser privileges.
45 #
46 # Under the sh, ksh, zsh:
47 #    $ ulimit -s
48 #    8192
49 #    $ ulimit -s 16000
50 #
51 # Under the csh:
52 #    % limit stacksize
53 #    stacksize        8192 kbytes
54 #    % limit stacksize 16000
55 #
56 EXPECT
57 Complex regular subexpression recursion limit (32766) exceeded at - line 6.