sub programControl {
...
programControl();
}

##</code><code>##

sub programControl {
...
subroutine1();
}
sub subroutine1 {
...
programControl();
}