Added first draft analytics perl script