Added throwaway perl scripts from TGI projects