my %record; @record{qw/group ac g f start end time mb files l kb/} = split /\s+/, $templine; # do something with $record{group}, $record{f}, $record{end}, etc..