| 1 | #!/usr/bin/env perl | 1 | #!/usr/bin/env perl |
|---|---|---|---|
| 2 | 2 | ||
| 3 | # Script to help making assertions on guild activity | 3 | # Script to help drawing conclusions on guild activity |
| 4 | # Usage is at the bottom | 4 | # Usage is at the bottom |
| 5 | 5 | ||
| 6 | use strict; | 6 | use strict; |
| 7 | use List::Util qw(max); | 7 | use List::Util qw(max); |
| 8 | 8 |
| – | Removed lines |
| + | Added lines |
| < | Changed lines |
| > | Changed lines |