Perl script to decide where or not a given graph is Hamiltonian.