rename calcPerl to calc