Select Code to Download

sub fn {
    my ($fn_x, $fn_y) = @_;
...
    $rc = 1 if $$fn_x ne 'x';
    return 0;
}