in reply to Re^2: How do I read this line of code?
in thread How do I read this line of code?

The loop iterates over the newline, spaces and the array. If you want to iterate it over the array and add newlines fore each member of the array, you can do
$buff .= "\n" . (' ' x ($level - 1)) . $_ for @pre_push;

[download]

In Section Seekers of Perl Wisdom