Select Code to Download

use warnings;
use strict;
...
name6    group7
name7    group4
name8    group5

$VAR1 = {
          'group4' => [
...
                        'name8'
                      ]
        };