my $result = do { no warnings 'numeric'; $x == $y };