use integer; my $result = 5/3; print "$result\n";