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

2 lines
37 B
Perl

my $i = 0;
print ++$i, "\n" while 1;