my $count;
@arr = (1) x 20;
print "Element ".$count++.":$_\n" for @arr;