You'll probably be happier using a regular expression for this kind of thing.

vougeot% cat 313208.pl

#!/usr/bin/perl
use strict;
use warnings;

my $string = 'OP=SiDarkRefRead&DEV=SI_PHOTO_DEV&CMD=READ&STATUS=PASS&R
+EAD_DATA={ 3 15 0 255 50000 1000 [0] = 1 [1] = 2 [2] = 3 [3] = 4 [4] 
+= 5 [5] = 6 [6] = 7 [7] = 8 [8] = 9 [9] = 10 [10] = 1 [11] = 2 [12] =
+ 3 [13] = 4 [14] = 5 [15] = 6 [16] = 7 [17] = 8 [18] = 9 [19] = 10 et
+c... ';

my @matches = $string =~ m!\[\d+\]\s+=\s+\d+!g;
# regex matches '[', one or more digits, 
# ']', one or more space characters, '=', 
# one or more space characters, one or more digits

print join "\n", @matches;


vougeot% perl 313208.pl

[0] = 1
[1] = 2
[2] = 3
[3] = 4
[4] = 5
[5] = 6
[6] = 7
[7] = 8
[8] = 9
[9] = 10
[10] = 1
[11] = 2
[12] = 3
[13] = 4
[14] = 5
[15] = 6
[16] = 7
[17] = 8
[18] = 9
[download]

---

---

Posts are HTML formatted. Put <p> </p> tags around your paragraphs. Put <code> </code> tags around your code and data!

Titles consisting of a single word are discouraged, and in most cases are disallowed outright.

Read Where should I post X? if you're not absolutely sure you're posting in the right place.

Please read these before you post! —

• How do I compose an effective node title?
• How do I post a question effectively?
• Markup in the Monastery

Posts may use any of the Perl Monks Approved HTML tags:

a, abbr, b, big, blockquote, br, caption, center, col, colgroup, dd, del, details, div, dl, dt, em, font, h1, h2, h3, h4, h5, h6, hr, i, ins, li, ol, p, pre, readmore, small, span, spoiler, strike, strong, sub, summary, sup, table, tbody, td, tfoot, th, thead, tr, tt, u, ul, wbr

You may need to use entities for some characters, as follows. (Exception: Within code tags, you can put the characters literally.)

	For:		Use:
	&		&
	<		&lt;
	>		&gt;
	[		&#91;
	]		&#93;

Link using PerlMonks shortcuts! What shortcuts can I use for linking?

See Writeup Formatting Tips and other pages linked from there for more info.