##
Text text Footnote code
##
##
Text text Footnote codeThe new text
##
##
sub jf { print substr($_[0], -1);
jf( substr($_[0], 0, length($_[0])-1))
if length $_[0] > 1; }
jf('gro.alubaf@yehaf');