package Math32 { use Inline 'C', <<~'END'; #include long calc(long input) { return (int32_t)((int32_t)input << 5); } END } use v5.36; say Math32::calc(1169367104); #### -1234958336