$ perl -wE 'for (0 .. 4) { say 11**$_ }' 1 11 121 1331 14641