Just because I can't resist. Here's some perl6 ways ...

$ perl6 -e'("xe-1/2/0","xe-2/2/0").split("-")».split("/").say'
xe 1 2 0 xe 2 2 0
$ perl6 -e'.split("-")».split("/").say for ("xe-1/2/0","xe-2/2/0")'
xe 1 2 0
xe 2 2 0
$ perl6 -e'.split("-")».split("/")».perl.say for ("xe-1/2/0","xe-2/2/0
+")'
"xe" "1" "2" "0"
"xe" "2" "2" "0"
$ perl6 -e'.split(/<[-/]>/)».Str.say for ("xe-1/2/0","xe-2/2/0")'
xe 1 2 0
xe 2 2 0
$ perl6 -e'.split(/<[-/]>/)».Str.perl.say for ("xe-1/2/0","xe-2/2/0")'
("xe", "1", "2", "0")
("xe", "2", "2", "0")
[download]