Program Repair Shop 18

Identity theft

        my $g = Guard->new("Fred");
        my $a1 = Alarm->new;
        $a1->add_observer($g);
        $a1->notify_observers("I like pie!");

continued...