You can e.g. assign a typeglob to another:

$foo = 42; @foo = ( 1, 2, 3 );
*bar = *foo;
print "$bar @bar";
undef *bar;
print "$bar @bar";
[download]

Where and why that might come useful I cannot tell; however, it does make sense to keep a single struct, does it not?