Help for this page
sub foo { my $x=shift; #code.... foo($x+1); }
sub foo { my $x=shift; ... $x++; goto START_OF_FOO; }