foreach my $elem (@vgmap) {
   printf "$elem->{node}:$elem->{vg}:$elem->{maj_num}\n";
}

##</code><code>##

node1:vg1:36
node2:vg1:36
node1:vg2:37
node2:vg2:37
node1:vg3:38
node2:vg3:40