@data = map { join '/', @$_ } sort {my_sort} @data;