Select Code to Download

sub root {
    my $self = shift;
...
    $root //= $self;
    return $root;
}

sub grandparent {
    my $self = shift;
...
else{
   ## take a different path
}