use Scalar::Util "weaken";
weaken $LanX; # One of us had to go. :P