my ( $name, $layer ) = @_;
...
process( $temp, $layer + 1 );