checktype

#!/usr/bin/env perl6

proto check_type($ --> Str) { * }
multi check_type(uint $var) { return "uint" }
multi check_type(Int $var) { return "Int" }

my uint $ui = 42;

say "Value is $ui"; # Value is 42
say check_type($ui); # uint
say ".^name is {$ui.^name}"; # .^name is Int
say check_type($ui); # uint
# .abs autoboxes
say check_type($ui.abs); # Int
# abs() does not
say check_type(abs $ui); # uint