my @header_line = ('id', 'name', 'age');
my %fields;
@fields{@header_line} = (0 .. $#header_line);
#result: %fields = { id => 0, name => 1, age => 2};