#!/usr/bin/env perl6 sub function { my ( Int $i ) = @_; say $i; say $i.WHAT; if ( $i > 2 ) { say "Greater then 2"; } else { say "Lower then 2"; } } function(1); function(2); function(3); function(4);