Select Code to Download

my %Fields = (
'filename' =>{
...
};
};
....

%F = ( aa => {
               BB => 'cc'
...
               MM => 'yy',

      )

perldoc perldsc