Assigning to an empty list forces the list context. See How can I count the number of occurrences of a substring within a string?:

$count = () = $string =~ /-\d+/g;
[download]