##
## << while (($v,$vv) = each %ENV) { print "$v = $vv\n" } >>
## 
<>