sub breakLink { my ($repl,$id) = @_; delete $repl->{linkedVars}->{id}; };