I doubt that I'm even approaching 10MB of memory - if one can go by the filesize * nº files 'required' etc...at least as a stating point?!?

You can't make that assumption at all. Hello World in Perl takes over 1MB although it is obviously only one line of Perl. I can use *all* your systems resources with just one 12 char line of perl. Perl is a memory pig in many ways. This reflects the optimisation strategy of spending memory to gain speed.

Re: debuging - I have included a &my_err() sub to sort-of 'trap' errors, but only for opening files and requiring files, nothing else. However, it certainly does the job.

You are totally missing the point. You need to see where your code gets to, so you add the debugging as suggested to do that. BTW you dont need the & if you call function().

$DEBUG=1;
$DEBUG && warn "Doing foo!\n";
foo();
$DEBUG && warn "Done foo!\n";
#etc
[download]

The whole thing just freezes!

It most certainly does not. You just don't know where it stops which is somewhere between starting and completing :-) That is why you need the debugging flow messages. The messages appear in the error log. See CGI Help Guide

So, apart from using a debug sub and following the 'flow' of data by putting "Ooh look! I managed to get this far" in the script, is there anything else I might be able to try or am I destined to go thru 1,000's of lines of code, doing CTRL-V and getting my script to go "Boo!" on-screen?!?

You don't seem to get it. You *need* to add the debug code. If the $DEBUG is set it writes messages to the error log for you to review. If $DEBUG=0 it does nothing. The code runs as usual. Thus you can put the code in and leave it. You don't even know where your code gets to, so you have no idea what the problem is. I have not seen your code, nor do I want to. All I can offer is the logic used by millions of programmers across the world. Don't speculate. Isolate the problem first, then fix it.

But there is a shortcut of sorts. If you don't mind going through reams of output then install Devel::Trace. In your cgi activate it as shown. Every *line* that is executed will then generate a logging message in the error logs.

#!/usr/bin/perl -d:Trace

Devel::Trace::trace('on');  # Enable

print "Hello World\n";

foo();

Devel::Trace::trace('off'); # Disable

foo();

sub foo{ print "Foo\n" }
[download]

Make sure this sample runs first, then just add -d:Trace to the shebang +/- Disable/Enable it in sections. Here is what happens when I run that and redirect stderr to a file.

C:\>test.pl 2>out
Hello World
Foo
Foo
[download]

So there is all the expected output, no more no less. Situation normal....but if we look in file 'out' (this will automatically be error_log with a CGI) we have a complete stack trace:

C:\>more out
>> C:\test.pl:3: Devel::Trace::trace('on');  # Enable
>> D:/Perl/site/lib/Devel/Trace.pm:31:   my $arg = shift;
>> D:/Perl/site/lib/Devel/Trace.pm:32:   $arg = $tracearg{$arg} while 
+exists $tracearg{$arg};
>> D:/Perl/site/lib/Devel/Trace.pm:33:   $TRACE = $arg;
>> C:\test.pl:5: print "Hello World\n";
>> C:\test.pl:7: foo();
>> C:\test.pl:13: sub foo{ print "Foo\n" }
>> C:\test.pl:9: Devel::Trace::trace('off'); # Disable
>> D:/Perl/site/lib/Devel/Trace.pm:31:   my $arg = shift;
>> D:/Perl/site/lib/Devel/Trace.pm:32:   $arg = $tracearg{$arg} while 
+exists $tracearg{$arg};
>> D:/Perl/site/lib/Devel/Trace.pm:33:   $TRACE = $arg;

C:\>
[download]

Thanks again for your advice and help - we all have to start somewhere to gain experience.

"Hello World" @ 1mb - oh! Would never have guessed!
Debugging - I do/did understand. What I didn't know how to do was your suggested $Debug plan. I will of course be using it - as well as reading the CGI Help Guide.
If you don't want to see my code, skip this bit ;-)

my $list;
foreach $a(0..$#my_array){
    $list .= qq¿<TR>\n¿;
    foreach $b(0,1,8,16,14){
        if($b == 0){
            $list .= qq¿\t<TD >${'flag_'.$languages[$my_array[$a][20]]
+[1]} ¿;
            $list .= &build_link("?act=subscriptions_view&what=$my_arr
+ay[$a][0]&m0=$m0&m1=1",$target,$my_array[$a][0]);
                $list .= qq¿\t</TD>¿;
            }
            elsif($b == 1){
[Note: $email is null: Included - script fails.  Excluded - script com
+pletes. ?!? DEBUG should find out why.]
                $list .= qq¿\t<TD >$email $my_array[$a][2] $my_array[$
+a][1] </TD>¿;
            }
            elsif($b == 14){
                $list .= qq¿\t<TD ALIGN="right" >$cat[$my_array[$a][14
+]][0]</TD>¿;
            }
            elsif($b == 16){
                $list .= qq¿\t<TD ALIGN="right" >$diff[$my_array[$a][1
+6]][0]</TD>¿;
            }
            else{
                $list .= qq¿\t<TD ALIGN="right" >$my_array[$a][$b]</TD
+>¿;
            }
        }
        $list .= qq¿</TR>\n¿;
    }
    $list .= qq¿</TABLE>\n $files_found <P> \$email = $email ¿;
return $list;
[download]

I'm sure the above code is fairly rudementary and undoubtely 100's of ways exist to achieve the same result, but this is what I've got! I have already spent more than several fruitless hours searching and trying to find out why and what 'breaks' just by including an empty variable '$email' in the above code. Again, DEBUG might hold the answer.

I will of course be following up on all your suggestions.

Thanks again for your time and help.

R.