$ perltidy -st -sct -sot tsttdy.pl
sub discoverX {
    return [ {
            'name'    => $name,
            'version' => $VERSION,
        },
        [ 1, 2, 3 ] ];
}

sub discover1 {
    return {
        'name'    => $name,
        'version' => $VERSION,
    };
}

sub discover2 {
    return [ {
            'name'    => $name,
            'version' => $VERSION,
        } ];
}

sub discover3 {
    return [ [ {
                'name'    => $name,
                'version' => $VERSION,
            } ] ];
}

##</code><code>##

sub discoverX {
    return [{
        'name' => $name,
        'version' => $VERSION,
    },
	    [1,2,3]
   ];
}