$commentout = $commentout .= $position;
s/$position/$commentout/;
print OTHER;  #THIS LINE HERE!!
$x++;