my $fn = eval "sub {
	my \@F = \@_;
	no warnings 'uninitialized';
	$perlCode
}";
die $@ if $@;