Select Code to Download

$ perl6 -MMONKEY-SEE-NO-EVAL -e 'my $a = 1e0 + 1e-15; say EVAL($a.perl
+) == $a'
False

$ perl6 -e 'my ($a, $b) = (1e0, 1e0 + 1e-15); say $a == $b; say set($a
+) ~~ set($b); say $a (-) $b'
False
True
set()