if(my $life eq "coding"){@{$self->{expression}} = split / */, "code" and $self->say() = "code";}