sub foo {
    my $self = shift;
    print $self->{KEY2} if $self->{KEY1};
    return ($self->{KEY3});
}