perl -le'$_="xe-2/2/0";print for $_ =~ /(\w+)/g'