Trying the following code

        foreach $j (@j)
        {
                alarm 2;
                ## don't set this globally!
                local $SIG{ALARM} = sub { die "timed out" };
                eval { callfc() };
                ## continue to next iteration if timed out
                next if $@ and $@ =~ /^timed out$/;
        }
[download]

simply causes the program to quit:

$ t21.pl
0
1
Terminating on signal SIGALRM(14)
[download]

I had tried something similar from the signal and eval Docs but it also terminated which is why I had switched to using the goto.

from what you have written, it would appear that it should iterate to the next iteration of the loop but it does not.

kakaze>