$bot->cookie_jar->scan(sub { print "Cookie key ", $_[1], "\n" })