$dec = pdl [[1,1,2,2,3],[10,15,13,11,6]];

##</code><code>##

[
 [ 1 15]
 [ 2 13]
 [ 3 6]
]