8 lines
134 B
Perl
8 lines
134 B
Perl
#!/usr/local/bin/perl
|
|
@digits = (1..10);
|
|
foreach $number (@digits){
|
|
print $number;
|
|
$number += 10;
|
|
}
|
|
print "\n\n@digits";
|