RosettaCodeData/Task/Integer-comparison/Perl-6/integer-comparison-2.pl6

say <Less Equal Greater>[($a <=> $b) + 1];