##

New Group: ref1 ref2 ref3
New Group: ref4 ref5
New Group: ref6 ref7 ref8
##

##

open(IN, '<', "test.in") || die "\nCan't open test.in\n $!\n";
while() {
if(){my @avalues;
        if(//){
           @avalues = (@avalues,$1);
        }print "\nNew Group: @avalues"
        }
}
close(IN);