RosettaCodeData/Task/Infinity/Perl/infinity-7.pl

4 lines
39 B
Perl

use bigint;
my $x = inf;
my $y = -inf;