for (1..110)
{
......//Only when this loops ends you are assigning zmax
}
$ZMAX = max @column8;
print "maxZ $ZMAX\n";
$ZMIN = min @column8;
print "minZ $ZMIN\n";
$thick = $ZMAX - $ZMIN;