in reply to Re: Chess Board Single Loop
in thread Chess Board Single Loop

How about this? 

print join( " ", 1..64 ) =~ s/(\d+\s?){8}\K/\n/gr;

[download]

In Section Seekers of Perl Wisdom