my @subthings = $obj->thing =~ m[subthing]g;