... why ...

Because, because it is, see http://perldoc.perl.org/perlop.html#Symbolic-Unary-Operators

Unary "-" performs arithmetic negation if the operand is numeric, including any string that looks like a number. If the operand is an identifier, a string consisting of a minus sign concatenated with the identifier is returned

See also Modern Perl page 170 Barewords