https://www.manu.co.in/csv-generation-in-perl-script/