Why is modulus different in different programming languages?

Question

Perl

print 2 % -18;

-->

-16

Tcl

puts [expr {2 % -18}]

-->

Answer 1

python, of course, explicitly informs you

>>> divmod(2,-18)
(-1, -16)