Perl implementation of the A* pathfinding algorithm
