$data = \$_[0]; $$data ++;