package Foo;

BEGIN {
  # &routine is not yet defined and therefore
  # can't be added to any list
}

sub routine { ... }