in reply to Getting data out of __DATA__ and __END__

If all the _DATA__ section is on one line then the easiest seems to be:

#!/bin/perl -w use strict; { local $/=' '; # here's your fixed string! my @ary = <DATA>; print join(" / ", @ary); } __DATA__ boop noop boop crep