Beefy Boxes and Bandwidth Generously Provided by pair Networks
Come for the quick hacks, stay for the epiphanies.
 
PerlMonks  

Re: poll ideas quest 2016

by ExReg (Priest)
on Mar 18, 2016 at 01:49 UTC ( [id://1158178]=note: print w/replies, xml ) Need Help??


in reply to poll ideas quest 2016

The best way to implement the tax code to actual perl code:

  • Head tax : $tax = $FEE;
  • Favor the rich : $tax = $k * log($income);
  • No tax : $tax = $income * 0;
  • Oops! : $tax = $income / 0;
  • Favor the 10s : $tax = $k*abs(sin($PI*$income/10000));
  • Leave it as is : $tax = rand ( $income );
  • Other:

Replies are listed 'Best First'.
Re^2: poll ideas quest 2016
by Ratazong (Monsignor) on Mar 18, 2016 at 07:45 UTC
    • Taxes are a poor-people-thing: $tax = ($income < 1000000 ? $income/3 : 0);
       any of above * $tax_evasion_factor;

      L*

      There are no rules, there are no thumbs..
      Reinvent the wheel, then learn The Wheel; may be one day you reinvent one of THE WHEELS.
Re^2: poll ideas quest 2016
by ExReg (Priest) on Mar 18, 2016 at 14:37 UTC

    Additional ones:

    • Flat tax: $tax = $k * $income;
    • How good is your CPA?: $tax = $k * ( $income - $cpa_income );

Log In?
Username:
Password:

What's my password?
Create A New User
Domain Nodelet?
Node Status?
node history
Node Type: note [id://1158178]
help
Chatterbox?
and the web crawler heard nothing...

How do I use this?Last hourOther CB clients
Other Users?
Others avoiding work at the Monastery: (6)
As of 2024-04-24 16:47 GMT
Sections?
Information?
Find Nodes?
Leftovers?
    Voting Booth?

    No recent polls found