Select Code to Download

    if ( (defined $request and $request>0 and $request<2000) and $acco
+unt_num=~/^[Gg]\d{3}-\w{5,6}+/) {
        ...
    }

    if ( expense_in_range($request) and is_expense_account($x) ) {
        ...
...
        ? 1
        : 0;
}

w();
x();
sub w { A; B }
sub x { C; D }

    function foo:
        A -> B -> C -> D -> E -> F

    function foo:
        A -> B -> C -> D 

    function bar:
        E -> F