RosettaCodeData/Task/Literals-Integer/Perl/literals-integer.pl
2023-07-01 13:44:08 -04:00

5 lines
236 B
Perl

print "true\n" if ( 727 == 0x2d7 &&
727 == 01327 &&
727 == 0b1011010111 &&
12345 == 12_345 # underscores are ignored; useful for keeping track of places
);