Visit a start vertex, then recurse into its first unvisited neighbour all the way down before backtracking. A visited set prevents revisiting, and neighbour insertion order fixes the visit sequence.

Algorithm

On the canonical 6-vertex graph from graph-adjacency-list, starting at vertex 1, the deterministic visit order is [1, 2, 4, 3, 5, 6]. Calls unwind 6 -> 5 -> 4 -> 3 -> 2 -> 1 after all vertices are visited.

Basic Implementation

basic.pl
use strict; use warnings;
my %adj = (
	1 => [2, 3],
	2 => [1, 4],
	3 => [1, 4],
	4 => [2, 3, 5],
	5 => [4, 6],
	6 => [5],
);
my %visited = ();
my @order = ();
sub dfs {
	my ($v) = @_;
	$visited{$v} = 1;
	push @order, $v;
	for my $nb (@{$adj{$v}}) {
		if (!exists $visited{$nb}) {
			dfs($nb);
		}
	}
}
dfs(1);
print "[" . join(", ", @order) . "]\n";

Complexity

  • Time: O(V + E)
  • Space: O(V) recursion depth

Implementation notes

  • Perl: a named sub dfs recurses over the file-lexical %visited and @order.
  • The replay shows the current vertex, the visited set, the running visit order, and the call stack after each entry, matching the lesson spec.
recursive descent Follow one branch to its end, then unwind and try the next neighbour.