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