Select Code to Download

package ReadCSV;
use strict;
...
   return \%output_hash;
}
1;

abc xyz,10
xyz pqr,2
pqr stq,0.1

use strict;
use warnings;
...
   print qq{\n};
}