Help for this page
#!/usr/bin/env perl -l ... my ($x, $y) = @_; return abs($x - $y); }
All records: 42 17 13 10 9 8 7 6 5 4 3 2 1 0 Group: 42 ... Group: 9 8 7 6 Group: 5 4 3 2 Group: 1 0