BEGIN
{
	sub WWW::Mechanize::worker_path
	{
		my $self = shift;
		
		foreach (@{$self->{page_stack}})
		{
			print STDERR $_->uri(),"\n";
		}
		
		return 1;
	}
}