Implement int() in actual Perl-JIT