Select Code to Download

use Data::Dumper;
use strict; 
...
           'b' => $array{'c'},
           'd' => $array{'c'}
         );

perl -v

...
Built 00:45:44 Mar 31 2003

---snip---