in reply to Fibonacci golf with one state variable
perl -E'sub f{$_[0]<2||f($_[0]-1)+f($_[0]-2)}say f$f++while 1' [download]