Diesen ABschnitt kapiere ich nicht ganz

[Code]
5 mal.
for (1..5) {
++$zahl;
print $zahl ** $potenz, "\n";[CODE]