sub foo { ### entering foo my $x = shift; ### x: $x return $x + 1; } ### starting... my $y = foo(42); ### y: $y ### finish exit; #### ### starting... ### entering foo ### x: 42 ### y: 43 ### finish