This is a command interpreter in perl for individual taste