Select Code to Download

$dw = "dw_urg";
%$dw_TG = qw(
...
{
print "$$dw_TG{$key} -> $key\n";
}

$dw_MKT -> mkt
$dw_STR -> str
$dw_VAR -> var