You can include a reassignment to %$ref at the end of the function:

%$ref = %c;
[download]

Or you can use a local variable and create an alias:

use vars '%c';  # if strict is on, which it IS, RIGHT?
*c = $ref;
[download]

Now, %c is really an alias to %$ref, so changes to one will show in the other.

_____________________________________________________
Jeff[japhy]Pinyan: Perl, regex, and perl hacker.
s++=END;++y(;-P)}y js++=;shajsj<++y(p-q)}?print:??;