RT-Plugins/RT-Client-Tools
6
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

I forgot map returns the last item in its block.

Browse source 
I want what $_ became, not the "1" returned from the s/// :)
This commit is contained in:
Bradley M. Kuhn 2018-07-25 09:49:50 -07:00
parent e11ceab5dd
commit c9c3b8b01e
1 changed files with 1 additions and 1 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

2
scripts/rt-bulk-prep-pay.plx
View file

@ -59,7 +59,7 @@ foreach my $ticketSpec (@ticketSpecs) {
} }
foreach my $paymentMethod (sort { $a cmp $b } keys %payments) { foreach my $paymentMethod (sort { $a cmp $b } keys %payments) {
print "$paymentMethod: Count: ", scalar(@{$payments{$paymentMethod}}), "\n"; 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";
} }
############################################################################### ###############################################################################
# #