programming-examples/perl/Statement/foreach Loop Array Processing.pl

8 lines
134 B
Perl
Raw Normal View History

2019-11-15 12:59:38 +01:00
#!/usr/local/bin/perl
@digits = (1..10);
foreach $number (@digits){
print $number;
$number += 10;
}
print "\n\n@digits";