Help for this page
$ perl -d rec.pl ... main::f(rec.pl:6): $_[0] unless $_[0] % 10000; 100 levels deep in subroutine calls!
$ perl -d rec.pl ... main::f(rec.pl:6): $_[0] unless $_[0] % 10000; 500 levels deep in subroutine calls!