my ($testnumber, $llimit, $value, $ulimit, $unit, $name) = 0..5; while () { my @split_array = split /\t/; # or whatever printf 'TestNum = %s Value = %s Name = %s Ulimit = %s Llimit = %s.', @split_array[$testnumber, $value, $name, $ulimit, $llimit]; }