ran it here
This commit is contained in:
parent
fcb9bfa2f4
commit
3372b61f08
2 changed files with 1 additions and 1 deletions
Binary file not shown.
2
dist.pl
2
dist.pl
|
@ -29,7 +29,7 @@ sub optipeep {
|
|||
return $min
|
||||
}
|
||||
|
||||
my $user = "dirk";
|
||||
my $user = "lee";
|
||||
|
||||
my $peep = reduce {$a->[0] > $b->[0] ? $b : $a} map {optipeep($_, $user)} @peeps;
|
||||
print Dumper $peep;
|
||||
|
|
Loading…
Add table
Reference in a new issue