Select Code to Download

my @E = ([1,3],[1,5],[2,3],[2,4],[2,5],[4,5]);
my $V = 5;
...
} else {
  print "No Hamiltonian circuit\n";
}

$string = q[
1 2 3 4 5
...

__OUTPUT__
Hamiltonian circuit: [ 5 -> 4 -> 2 -> 3 -> 1 -> 5 ]