On Jun 19, 5:07 pm, stu21...@lycos.com wrote:
> I have some text that specifies inherited runners in baseball:
>
> 'Hughes, D 2-0, O'Flaherty 2-0, Moylan 1-1'
>
> I want to split on the comma and associate the numbers with that player. The
> problem is that sometimes the player's first initial is used sometimes not.
> Is there a clever way to consider the comma part of the name when an initial
> is used and a delimiter otherwise? Thanx
Another possible option maybe:
my %runners = split / ([0-9]+-[0-9]+) /x, $s;
# Note: paren's around the split regex
# print Dumper \%runners;
# $VAR1 = {
# ', Moylan ' => '1-1',
# 'Hughes, D ' => '2-0',
# ', O\'Flaherty ' => '2-0'
# };
--
Charles DeRykus
--
To unsubscribe, e-mail: beginners-unsubscr...@perl.org
For additional commands, e-mail: beginners-h...@perl.org
http://learn.perl.org/
