in reply to Parsing file to pull out sections of text

Sounds like a job for Perl regular expressions.

while (<>) { if (/(d\d)/) { push @array, $1; } }