print $columns[$n]-8 ,"\n";