#!/usr/bin/perl use warnings; use strict; my @c = (1..6); for(my $i = 0; $i <= $#c; $i++){ print("$c[$i] \n"); }
for ($i=0; $i<#whatever#; $i++){ #your code }