Jump to content

View source for Sum Matching Group in Perl

← Sum Matching Group in Perl

You do not have permission to edit this page, for the following reason:

The action you have requested is limited to users in the group: Users.

You can view and copy the source of this page.

Perl script to find a number in matching lines and report the sum.

<geshi lang="perl">
perl -ne '$sum += $1 if /in (.*) seconds/; END { print $sum }'
</geshi>

[[Category:Perl]]

Return to Sum Matching Group in Perl.

Retrieved from "https://www.theeggeadventure.com/wikimedia/index.php/Sum_Matching_Group_in_Perl"