my $string = "foo / bar & etc";
my @parts = split(/ (\&|\/) /,$string);
print join("\n",@parts);

##</code><code>##

my $string = "foo	bar	etc";
my @parts = split(/\t/,$string);
print join("\n",@parts);