Select Code to Download

if($tmp eq 'F'){
        ;    # do nothing, spot held for clarity
...
        ...  # do something 
    }
}

$tmp = $some_result;
my $handler = $handlers{$tmp};
&$handler(...) if $handler; # might be undef, as in 'F' case