$pack1 = "alpha";
$sym1 = "beta";

$pack2 = "charlie";
$sym2 = "delta";

# insert magic here, that does this, without hardcoding the identifiers
# *alpha::beta = *charlie::delta