Select Code to Download

 A
 B

  A
 B C

  A
  B
  C

    A
    |\
    B |
    |/
    C

sub reachable {
    my ($links, $start, $dest) = @_;
...

    $ptr = $_;
}