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

I am using these suggestions to make my code read better. I updated the validation of inputs by using the die fuction. I updated the loop to include the "unless" condition( I thought this was a nice method.).

Next step, is to take user input for each Metal polygon to be drawn and make sure these dimensions are within the predetermined limits.

Then work on adding the dimensions of the via by user and test those against its limit.

finally, check that via are laid out within the dimensions of each Metal that sandwiches it.

I think I want to reference each Metal layer to a table when testing its limits by using a hash, What do you think?

I will need a bit more info on what you are trying to do in order to tell you what I think.

BTW, it is awkward to repeatedly test/trial-and-error a program which keeps asking user input from the command line. So, while testing your logic, perhaps you can hardcode some of those $input1, $input2. Or you can read them from a file (in this case you can test many different values), or if you are on a *nix command line printf "1\n5\n" | yourscript.pl or enter the values 1 and 5 in separate lines in myfile.txt and then cat myfile.txt | yourscript.pl