@data = map { join '/', @$_ } sort { my_sort() } @data; # works

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