my @steps = (..list of some stuff.....);
foreach my $step (@steps)
{
   ..use $step...here... no $i index needed..
}