Lines Matching full:title

8     is( $p->greeting, "Hi, I'm Donald Duck", "blank title");
10     is( $p->greeting, "Hi, I'm Mr Donald Duck", "changed title");
23     is( $ans, "Hi, I'm Donald Duck", "thread: blank title");
26     is( $ans, "Hi, I'm Mr Donald Duck", "thread: changed title");
59         CFF::fieldhash my %title;
64             $title{ $p} = shift || '';
69         sub title { $title{ shift() } }
80         $_ and $greet .= "$_ " for $p->title;
93             my ( $name, $title) = @_;
94             $p->Person::init( $name, $title);
95             $p->assume_title( $title);
99         sub title { $assumed_title{ shift()} }