*{$caller . '::' . substr $symbol, 1} = $ref;