my $a = 1;
my $result = $a <=> 5
