Perltidy whole function