my @ary = split (" ",$_) while (<DATA>);
print join(" / ", @ary);

__DATA__
boop noop boop crep
# prints "", whereas I wd have expected it
# to print "boop / noop / boop / crep"