print $brain->{cells};
# this prints:
# No such pseudo-hash field "cells" in variable $brain of type Dog at test.pl line 48.