Select Code to Download

my %hash = map { split } @names_marks;

my %hash = ( 'bob', 1 );
# or
my %hash = ( bob => 1 );

my %hash;
for( @names_marks ) { %hash = split }
# or, expanding split
for( @names_marks ) { %hash = split ' ', $_ }