foreach Loop Array Processing
#!/usr/local/bin/perl @digits = (1..10); foreach $number (@digits){ print $number; $number += 10; } print "\n\n@digits";