add the initial revision for modern perl examples