Perltidy code