Help for this page

Select Code to Download

Select or download this

13:24 >perl -wE "$|++; say ''; sub f { print qq($_[0] ); if ($_[0] >= 
+99) { say 'Bye!'; } else { f($_[0] + 1); } } f(1);"

...
13:24 >perl -v

This is perl 5, version 22, subversion 0 (v5.22.0) built for MSWin32-x
+64-multi-thread