At 02:39 PM 12/5/2006 -0500, Joe Discenza wrote:
>The tr/// operator counts all the occurrences of the translated
>character(s) in $_ (the default), and then you just increment the @semis
>array at the index of the number of semicolons found to indicate another
>line with that number of semicolons.
Heh, clever, but probably too clever. That will give u an array full of
zero's. U can't have sparse arrays in perl. Doing ++$semis{ tr/;/;/ };
would be better.
--
REMEMBER THE WORLD TRADE CENTER ---=< WTC 911 >=--
"...ne cede malis"
00000100
_______________________________________________
Perl-Win32-Users mailing list
Perl-Win32-Users@listserv.ActiveState.com
To unsubscribe: http://listserv.ActiveState.com/mailman/mysubs
