dude, please stop pretending like you understand perl code, or indeed programming at all. Your response is completely wrong.

Oh, I'm sorry. I am learning by practicing stuff out; I usually do printing of the values as I go then arrange those somehow before my next subroutine. Here, I just could come up with a good way to get the last element of what will be -(what I think...maybe)- it will be a hash to reference sizes of each polygon. I appreciate the help. Thanks!

perlynewby the above comment was not directed to you.

Note that $i <= ($End-1) can be simplified to $i < $End and also you can use single quotes inside double quotes so that you don't have to escape double quotes print "aaa\"xx\"zzz\n"; print "aaa'xx'zzz\n";

I hope Perl helps you automate