A matrix

Here is the input file matrix.t:

my $a_box = [ [ $a11, $a12, $a13, $a14, $a15, $a16 ], 
[ $a21, $a22, $a23, $a24, $a25, $a26 ], [ $a31, $a32, $a33, $a34, $a35, $a36 ],
[ $a41, $a42, $a43, $a44, $a45, $a46 ], [ $a51, $a52, $a53, $a54, $a55, $a56 ],
	  [ $a61, $a62, $a63, $a64, $a65, $a66 ], ];

The command perltidy matrix.t produces a file named matrix.t.tdy with this result:

my $a_box = [
    [ $a11, $a12, $a13, $a14, $a15, $a16 ],
    [ $a21, $a22, $a23, $a24, $a25, $a26 ],
    [ $a31, $a32, $a33, $a34, $a35, $a36 ],
    [ $a41, $a42, $a43, $a44, $a45, $a46 ],
    [ $a51, $a52, $a53, $a54, $a55, $a56 ],
    [ $a61, $a62, $a63, $a64, $a65, $a66 ],
];