#!/usr/bin/perl
for (<>) {
($r, @a) = /([-\d]+)/g;
for (@a) {
@b = /(\d+)/g;
$h{$_}++ for $b[0]..$b[-1]
}
}
printf "%d: %d\n", $_, $h{$_}//0 for @s;
IyEvdXNyL2Jpbi9wZXJsCmZvciAoPD4pIHsKICAoJHIsIEBhKSA9IC8oWy1cZF0rKS9nOwogIHB1c2ggQHMsICAkcjsKICBmb3IgKEBhKSB7CiAgICBAYiA9IC8oXGQrKS9nOwogICAgJGh7JF99KysgZm9yICRiWzBdLi4kYlstMV0KICB9Cn0KcHJpbnRmICIlZDogJWRcbiIsICRfLCAkaHskX30vLzAgZm9yIEBzOw==
MTomZ3Q7Jmd0OzIKMjomZ3Q7Jmd0OzEKMzomZ3Q7Jmd0OzEtMwo0OiZndDsmZ3Q7MSwzCjU6Jmd0OyZndDsxLDItNA==
1:>>2
2:>>1
3:>>1-3
4:>>1,3
5:>>1,2-4