I'm answering my own question, I got it figured out - I was making this much harder than necessary. In the following, I included line 16 which calls outside of the "no strict 'refs'", causing an error, so as to show that "strict refs" is operating normally outside of the block. Also, if you only want to call out a sub by a number, you don't need the JumpTbl hash, that's only needed to call it out by name:

use strict;                                                           
+                                       
use warnings;

my @FuncList = qw(TestSub1 TestSub2);

my %JumpTbl = map { $_ => $_ } @FuncList;

{
    no strict 'refs';
    $JumpTbl{'TestSub2'}();
    $FuncList[0]();
}
$JumpTbl{'TestSub1'}();

exit;


sub TestSub1 {
    print "TestSub1\n";
}


sub TestSub2 {
    print "TestSub2\n";
}

[download]

Output:

TestSub2
TestSub1
Can't use string ("TestSub1") as a subroutine ref while "strict refs" 
+in use at ./triv.pl line 16.

[download]

In reply to Re: Calling func named in string by MikeL
in thread Calling func named in string by MikeL

Title:
Use:  <p> text here (a paragraph) </p>
and:  <code> code here </code>
to format your post, it's "PerlMonks-approved HTML":


  • Posts are HTML formatted. Put <p> </p> tags around your paragraphs. Put <code> </code> tags around your code and data!
  • Titles consisting of a single word are discouraged, and in most cases are disallowed outright.
  • Read Where should I post X? if you're not absolutely sure you're posting in the right place.
  • Please read these before you post! —
  • Posts may use any of the Perl Monks Approved HTML tags:
    a, abbr, b, big, blockquote, br, caption, center, col, colgroup, dd, del, details, div, dl, dt, em, font, h1, h2, h3, h4, h5, h6, hr, i, ins, li, ol, p, pre, readmore, small, span, spoiler, strike, strong, sub, summary, sup, table, tbody, td, tfoot, th, thead, tr, tt, u, ul, wbr
  • You may need to use entities for some characters, as follows. (Exception: Within code tags, you can put the characters literally.)
            For:     Use:
    & &amp;
    < &lt;
    > &gt;
    [ &#91;
    ] &#93;
  • Link using PerlMonks shortcuts! What shortcuts can I use for linking?
  • See Writeup Formatting Tips and other pages linked from there for more info.