if ($type eq 'square' or 'Square'){

##</code><code>##

if ( ($type eq 'square') or ($type eq 'Square') ){

##</code><code>##

if (lc($type) eq 'square'){