add perl scripts