Select Code to Download

eg.Table;M
     Data;O
     ......

%hMFD = (
         Name_of_the_file_without_ext => {
                 Fieldname_1(column A) => 'value M or O(column B)',
...
                 Fieldname_x(column A) => 'value M or O(column B)',
                },
     );

#!c:\perl\ -w
use Text::CSV;
...
            }
        close CSV;
        }