9 lines
94 B
Perl
9 lines
94 B
Perl
$counter = 1;
|
|
|
|
do
|
|
{
|
|
print "$counter ";
|
|
} while ( ++$counter <= 10 );
|
|
|
|
print "\n";
|