my $key = join(' ', splice(@fields, 0, 2)); \_______ ____________/ \ v \ (1) \___ __________________________/ v (2)