#this line is problematic

   @$scalarclose[$count]=map {$_}, @ctagarray;