sub makeLinks {
    ...
    my @nholes = (); 
    for my $nh ($obj->{'board'}->getHoles()) {
        my %newHole = %$_;
	push ( @nholes, \%newHole );
    }
    ...
}