I forgot map returns the last item in its block.
I want what $_ became, not the "1" returned from the s/// :)
This commit is contained in:
parent
e11ceab5dd
commit
c9c3b8b01e
1 changed files with 1 additions and 1 deletions
|
@ -59,7 +59,7 @@ foreach my $ticketSpec (@ticketSpecs) {
|
|||
}
|
||||
foreach my $paymentMethod (sort { $a cmp $b } keys %payments) {
|
||||
print "$paymentMethod: Count: ", scalar(@{$payments{$paymentMethod}}), "\n";
|
||||
print " Tickets: ", join(", ", map { s%^\s*ticket\s*/\s*%%; } @{$payments{$paymentMethod}});
|
||||
print " Tickets: ", join(", ", map { s%^\s*ticket\s*/\s*%%; $_; } @{$payments{$paymentMethod}}), "\n";
|
||||
}
|
||||
###############################################################################
|
||||
#
|
||||
|
|
Loading…
Reference in a new issue