add alias, and change perl snippet