@data = qw[
  0/1/2/3 0 0/4/5/6 0/4 0/1 0/1/2
  0/4/5 0/10/111/145  0/10/111 0/10
];;

print for map{ 
    $_->[0]
} sort{ 
    $a->[1] cmp $b->[1] 
} map{ 
    [ $_, pack 'C*', split '/', ] 
} @data;;

0
0/1
0/1/2
0/1/2/3
0/4
0/4/5
0/4/5/6
0/10
0/10/111
0/10/111/145