perl library read data from parts of the __DATA__ section - View it on GitHub