How should I do integer division in Perl?

Question

What is a good way to always do integer division in Perl?

For example, I want:

real / int = int

int / real = int

int / int = int

Answer 1

You can cast ints in Perl:

int(5/1.5) = 3;