简化的文本计数结果显示

Question

显而易见的答案（至少对我来说）是在| scriptingprogram之前插入>。但是让我们假设你想要一个完全基于 TeX 的解决方案。我做了以下更改：

对我来说，最难的部分是texcount将 a#放入其输出中。我最终决定忽略该行，只使用包含 section 的行（我也无法开始grep -v '#'工作）。
似乎-inc没有显示输入文件的节数；但-merge确实如此。
我正在使用 \jobname 来使其更具可移植性（但\input{\jobname suffix}会混淆 texcount）。

在每个 [sub] 节之后，您可以使用命令\withlimit{#}为该区域设置限制。如果不这样做，您将-1在最后得到。如果\withlimit与节命令在同一行，texcount 会感到困惑。TeX 实际上不适用于关联数组，因此\withlimit根据节标题定义一些命令。这意味着节标题非常脆弱。其中任何奇怪的内容（数学、其他命令等）都会弄乱一切。

我改编了逐行读取文件https://tex.stackexchange.com/a/137198/107497并使用了相当多的字符串操作。这（以及关联数组）让我想到 LaTeX3（或任何其他编程语言）方法会更简单。

\documentclass{article}     

\usepackage{filecontents}
\begin{filecontents*}{texcountinc.tex}
Input contents.

\subsection*{Input section title}
\withlimit{40}
File contents that will get input elsewhere. $a^2+b^2=c^2$.
\[\frac{\sin A}a=\frac{\sin B}b=\frac{\sin C}c\]
\end{filecontents*}

% Compile with  --enable-write18 or --shell-escape options   
\immediate\write18{texcount -char -merge -tex -sum \jobname.tex | grep -i section > \jobname Count.txt} % counts characters
%\immediate\write18{texcount -merge -tex -sum \jobname.tex | grep -i section > \jobname Count.txt} % counts words
\newcommand{\limitcount}{-1}

\usepackage{xstring}
\usepackage{ifthen}
\usepackage{xcolor}
\usepackage{nameref}

\newcommand{\processCount}{%
 \newread\counts
 \def\zpar{\par}
 \openin\counts=\jobname Count.txt
 \loop
 \read\counts to \sectioncount
 \ifx\sectioncount\zpar\else
 \showcount{\sectioncount}\\
 \fi
 \ifeof\counts
 \else
 \repeat
}

\newcommand*{\showcount}[1]{%
 % e.g. 67+18+0 (1/0/0/0) S[ubs]ection: The first subsection
 \StrBehind{#1}{ection: }[\sectiontitleplusspace]
 \StrGobbleRight{\sectiontitleplusspace}{1}[\sectiontitle]
 \StrBefore{#1}{+}[\thiscount]
 \expandafter\ifcsname\sectiontitle limit\endcsname%
  \renewcommand{\limitcount}{\csname\sectiontitle limit\endcsname}%
 \else%
  \renewcommand{\limitcount}{-1}%
 \fi%
 \sectiontitle:
 {%
  \ifthenelse{\thiscount>\limitcount}{%
   \textcolor{red}{\thiscount/\limitcount}%
   \ifthenelse{\limitcount>-1}{%
    \ (over by \number\numexpr\thiscount-\limitcount\relax)%
   }{}%
  }{%
   \textcolor{green}{\thiscount/\limitcount}%
  }%
 }
}

\makeatletter
\newcommand*{\withlimit}[1]{%
 \expandafter\newcommand\csname\@currentlabelname limit\endcsname{#1}
}
\makeatother

\usepackage{lipsum}

\begin{document}

\section*{Section A Under Limit}
\withlimit{25}

Content for section A

\section*{Another section with subsections over limit}
\withlimit{15}

Introduction to section

\subsection*{The first subsection no stated limit}

This subsection has somewhat more voluminous content which tends to go on and on...

\subsection*{Extra spaces ignored  }
\withlimit{50}

Content aimed at testing whether math and symbols are counted: $\int$, $\Sigma$.


\section*{texcount doesn't understand lipsum}
\withlimit{1}

\lipsum[1]

\subsection*{Inputing Content}
\withlimit{18}

\input{texcountinc}

%TC:ignore 

\section*{An ignored section}

\lipsum[2]

%TC:endignore 

% display information on document
\section{Document info}
\processCount

\end{document}

Answer 1

显而易见的答案（至少对我来说）是在| scriptingprogram之前插入>。但是让我们假设你想要一个完全基于 TeX 的解决方案。我做了以下更改：

对我来说，最难的部分是texcount将 a#放入其输出中。我最终决定忽略该行，只使用包含 section 的行（我也无法开始grep -v '#'工作）。
似乎-inc没有显示输入文件的节数；但-merge确实如此。
我正在使用 \jobname 来使其更具可移植性（但\input{\jobname suffix}会混淆 texcount）。

在每个 [sub] 节之后，您可以使用命令\withlimit{#}为该区域设置限制。如果不这样做，您将-1在最后得到。如果\withlimit与节命令在同一行，texcount 会感到困惑。TeX 实际上不适用于关联数组，因此\withlimit根据节标题定义一些命令。这意味着节标题非常脆弱。其中任何奇怪的内容（数学、其他命令等）都会弄乱一切。

我改编了逐行读取文件https://tex.stackexchange.com/a/137198/107497并使用了相当多的字符串操作。这（以及关联数组）让我想到 LaTeX3（或任何其他编程语言）方法会更简单。

\documentclass{article}     

\usepackage{filecontents}
\begin{filecontents*}{texcountinc.tex}
Input contents.

\subsection*{Input section title}
\withlimit{40}
File contents that will get input elsewhere. $a^2+b^2=c^2$.
\[\frac{\sin A}a=\frac{\sin B}b=\frac{\sin C}c\]
\end{filecontents*}

% Compile with  --enable-write18 or --shell-escape options   
\immediate\write18{texcount -char -merge -tex -sum \jobname.tex | grep -i section > \jobname Count.txt} % counts characters
%\immediate\write18{texcount -merge -tex -sum \jobname.tex | grep -i section > \jobname Count.txt} % counts words
\newcommand{\limitcount}{-1}

\usepackage{xstring}
\usepackage{ifthen}
\usepackage{xcolor}
\usepackage{nameref}

\newcommand{\processCount}{%
 \newread\counts
 \def\zpar{\par}
 \openin\counts=\jobname Count.txt
 \loop
 \read\counts to \sectioncount
 \ifx\sectioncount\zpar\else
 \showcount{\sectioncount}\\
 \fi
 \ifeof\counts
 \else
 \repeat
}

\newcommand*{\showcount}[1]{%
 % e.g. 67+18+0 (1/0/0/0) S[ubs]ection: The first subsection
 \StrBehind{#1}{ection: }[\sectiontitleplusspace]
 \StrGobbleRight{\sectiontitleplusspace}{1}[\sectiontitle]
 \StrBefore{#1}{+}[\thiscount]
 \expandafter\ifcsname\sectiontitle limit\endcsname%
  \renewcommand{\limitcount}{\csname\sectiontitle limit\endcsname}%
 \else%
  \renewcommand{\limitcount}{-1}%
 \fi%
 \sectiontitle:
 {%
  \ifthenelse{\thiscount>\limitcount}{%
   \textcolor{red}{\thiscount/\limitcount}%
   \ifthenelse{\limitcount>-1}{%
    \ (over by \number\numexpr\thiscount-\limitcount\relax)%
   }{}%
  }{%
   \textcolor{green}{\thiscount/\limitcount}%
  }%
 }
}

\makeatletter
\newcommand*{\withlimit}[1]{%
 \expandafter\newcommand\csname\@currentlabelname limit\endcsname{#1}
}
\makeatother

\usepackage{lipsum}

\begin{document}

\section*{Section A Under Limit}
\withlimit{25}

Content for section A

\section*{Another section with subsections over limit}
\withlimit{15}

Introduction to section

\subsection*{The first subsection no stated limit}

This subsection has somewhat more voluminous content which tends to go on and on...

\subsection*{Extra spaces ignored  }
\withlimit{50}

Content aimed at testing whether math and symbols are counted: $\int$, $\Sigma$.


\section*{texcount doesn't understand lipsum}
\withlimit{1}

\lipsum[1]

\subsection*{Inputing Content}
\withlimit{18}

\input{texcountinc}

%TC:ignore 

\section*{An ignored section}

\lipsum[2]

%TC:endignore 

% display information on document
\section{Document info}
\processCount

\end{document}

简化的文本计数结果显示

答案1

相关内容