I'll second that. (Perl 5.8 on Linux)

I used:

my %Tests = (
        Development => [ '"Drayton, xxx",,3 Years and 7 Months,,,,,,',
                 '"Areen, xxx",,3 Years and 9 Months,,,,,,',
                 '"Lyles, xxx",,4 Years and 0 Months,,,,,,',
                 '"Coleman, xxx",,3 Years and 9 Months,,,,,,',
               ],
       );

and it printed:

Test and students are
 Development:
4
"Drayton, xxx",,3 Years and 7 Months,,,,,,
"Areen, xxx",,3 Years and 9 Months,,,,,,
"Lyles, xxx",,4 Years and 0 Months,,,,,,
"Coleman, xxx",,3 Years and 9 Months,,,,,,
4
"Areen, xxx",,3 Years and 9 Months,,,,,,
"Coleman, xxx",,3 Years and 9 Months,,,,,,
"Drayton, xxx",,3 Years and 7 Months,,,,,,
"Lyles, xxx",,4 Years and 0 Months,,,,,,,,,,,,,,,
,,,,,,,,,
[download]

cheers,

J