From fe5ba7746f7ec5a1d33195160c00654a7bd869dc Mon Sep 17 00:00:00 2001 From: Jason Stephenson Date: Mon, 11 Apr 2016 12:25:57 -0400 Subject: [PATCH] LP 1768715: Make the pingest.pl --pipe option be greedy. The --pipe option is used with pingest.pl now assumes that that any string of digits in the input is a record id. Instead of using just the first string of digits on a line, as it did before, it now uses each string of digits on a line. Signed-off-by: Jason Stephenson Signed-off-by: Bill Erickson --- Open-ILS/src/support-scripts/pingest.pl | 6 +++--- 1 file changed, 3 insertions(+), 3 deletions(-) diff --git a/Open-ILS/src/support-scripts/pingest.pl b/Open-ILS/src/support-scripts/pingest.pl index 8389c5328c..2e610f9913 100755 --- a/Open-ILS/src/support-scripts/pingest.pl +++ b/Open-ILS/src/support-scripts/pingest.pl @@ -145,9 +145,9 @@ sub duration_expired { my @input; if ($opt_pipe) { while () { - # Want only numbers, one per line. - if ($_ =~ /([0-9]+)/) { - push(@input, $1); + # Assume any string of digits is an id. + if (my @subs = /([0-9]+)/g) { + push(@input, @subs); } } } else { -- 2.11.0