usando xstring para obtener el apellido del autor principal de authblk en un archivo de clase

usando xstring para obtener el apellido del autor principal de authblk en un archivo de clase

Me gustaría consultar el apellido del primer autor de un artículo y luego ponerlo en el encabezado. Utilizo \StrBetween en la macro \AB@authlist para obtener la parte de la cadena entre el primer espacio y la primera coma, lo que da como resultado un resultado extraño debido al marcador de autor ($^1$). ¿Cuál es el carácter final correcto para que el comando devuelva solo el apellido del autor? Quiero pasar esto desde el archivo .cls, aunque agregué un .tex MWE para demostrar el problema a continuación.

MWE.cls:

   \NeedsTeXFormat{LaTeX2e}
\ProvidesClass{chkcls}[2020/08/25 v0 class]
\ExecuteOptions{a4paper,10pt}
\ProcessOptions
\LoadClass[10pt,a4paper]{article}
\RequirePackage{amsfonts,amsbsy,authblk,xstring}
\newcommand {\leadauthor} {
\StrBetween[1,1]{\AB@authlist,}{ }{,}\par
}
\endinput

MWE.tex:

\documentclass[10pt]{chkcls}
\usepackage{amsfonts,amsbsy,authblk,xstring}
\begin{document}
\title{A funny title} 
\author[1]{First Author}
  \author[2]{Second author}  
  \author[3]{Third author} 
\affil[1]{[email protected], Germany} 
\affil[2]{[email protected], Spain} 
\affil[3]{[email protected], Norway} 
\maketitle
Some text in the document
\leadauthor
\end{document}

Actualmente resulta en:Author101012.0pt12.0pt1

información relacionada