I'm not quite clear on what you want. If you have space separated data, you can use split as per sh1tn's post. On the other hand, if you want the array names in the __DATA__ block, you can do this:

my @array1 = qw(1 2 3 4 5);
my @array2 = qw(a b c d e);
my @array3 = qw(6 7 8 9 0);
my @array4 = qw(f g h i j);
while (<DATA>)
{
        foreach (eval($_))
        {
                print "$_\n";
        }
        print "\n";
}
__DATA__
@array1;
@array2;
@array3;
@array4;
[download]

Update: Removed the quotes around $_ - quite right AM, my mistake. I tried various approaches to this problem, and the quotes were left over from a previous one.

As to use strict, I always always always use strict. In future I'll leave it in when posting code snippets.