Hello anita2R,

If you follow BrowserUk’s advice (as you should) then it may help you to know where your original post ended. Here’s my best reconstruction of the final subroutine:

BTW, it’s no longer considered good practice to call a subroutine using an ampersand prefix, which has the effect of circumventing prototypes. Unless you have a good reason to do this (and you usually won’t), omit the prefix:

$message = replaceCc( $message );
[download]

From perlsub:

A subroutine may be called using an explicit & prefix. The & is optional in modern Perl, as are parentheses if the subroutine has been predeclared. The & is not optional when just naming the subroutine, such as when it's used as an argument to defined() or undef(). Nor is it optional when you want to do an indirect subroutine call with a subroutine name or reference using the &$subref() or &{$subref}() constructs, although the $subref->() notation solves that problem.

Hope that helps,

Athanasius

Thanks. I have removed most of the POD documentation from within the code, leaving only brief help documentation.

This brings the code down in size enough to post within the limit. I won't include the other files including the full POD help file unless someone asks for it.

I will go back and change the subroutine calls, but it will take a while to test that all works well. I will repost in due course

Perhaps there are one or more logical subdivisions of the code?

If so, re-post the first chunk in the root node and add the rest as one or more posts subordinate to it.

BrowserUk

There are some logical sections, but I think I have reduced it sufficiently by removing POD documentation, to post it in one go.

If it still doesn't work, I will take your advice and split the code at logical sections