perl: new git-cal