Re^2: regex on gigabyte string

Whoa back!

I am using a construct of if( substr($bigstring, $begtagidx, 5) eq "<c r=" ) Where $begtagidx is out to 4 billion and have not seen problem.

But the data verification process is not yet terminated so I will have to get back to you cloistered people on this.

thanks for the pearls of scripture !

Comment on Re^2: regex on gigabyte string

Replies are listed 'Best First'.
Re^3: regex on gigabyte string by BrowserUk (Patriarch) on Jan 26, 2013 at 19:56 UTC
Where $begtagidx is out to 4 billion and have not seen problem. Okay. It seems that limitation has been lifted with 5.16 (I still use 5.10.1 as my primary Perl where it is the case): `say $];; 5.016001 $s = 'fred'; $s x= 10243;; print substr( $s, -4 );; fred` [download] But the 2GB limit on regex still persists in 5.16: [19:51:25.70] C:\test>\perl64-16\bin\perl \perl64\bin\p1.pl [0] Perl> say $];; 5.016001 [0] Perl> $s = 'fred'; $s x= 10243;; [0] Perl> ++$n while $s =~ /fred/g; say $n;; Use of uninitialized value $n in say at (eval 9) line 1, <STDIN> line +3. [0] Perl> $s = 'fr'; $s x= 10243;; [0] Perl> ++$n while $s =~ /fr/g; say $n;; Use of uninitialized value $n in say at (eval 11) line 1, <STDIN> line + 5. [0] Perl> $s = 'fr'; $s x= 10203;; [0] Perl> ++$n while $s =~ /fr/g; say $n;; 1061208000 [0] Perl> [download] With the rise and rise of 'Social' network sites: 'Computers are making people easier to use everyday' 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.	[reply] [d/l] [select]

Replies are listed 'Best First'.

Re^3: regex on gigabyte string
by BrowserUk (Patriarch) on Jan 26, 2013 at 19:56 UTC

Where $begtagidx is out to 4 billion and have not seen problem.

Okay. It seems that limitation has been lifted with 5.16 (I still use 5.10.1 as my primary Perl where it is the case):

say $];;
5.016001

$s = 'fred'; $s x= 1024**3;;

print substr( $s, -4 );;
fred
[download]

But the 2GB limit on regex still persists in 5.16:

[19:51:25.70] C:\test>\perl64-16\bin\perl \perl64\bin\p1.pl
[0] Perl> say $];;
5.016001
[0] Perl> $s = 'fred'; $s x= 1024**3;;
[0] Perl> ++$n while $s =~ /fred/g; say $n;;
Use of uninitialized value $n in say at (eval 9) line 1, <STDIN> line 
+3.

[0] Perl> $s = 'fr'; $s x= 1024**3;;
[0] Perl> ++$n while $s =~ /fr/g; say $n;;
Use of uninitialized value $n in say at (eval 11) line 1, <STDIN> line
+ 5.

[0] Perl> $s = 'fr'; $s x= 1020**3;;
[0] Perl> ++$n while $s =~ /fr/g; say $n;;
1061208000
[0] Perl>
[download]

With the rise and rise of 'Social' network sites: 'Computers are making people easier to use everyday'

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.

[reply]
[d/l]
[select]