Added main perl file to construct CSV output