Select Code to Download

$ echo -e "sub testing\n{\nx=1;x++;if(1){\nx--;\n}\n}\n" | perltidy -b
+li -i=2 -et=2
sub testing
        {
...
0000020      (   1   )  \n  \t  \t   {  \n  \t  \t   x   -   -   ;  \n
0000030 \t  \t   }  \n  \t   }  \n  \n