Looking for a valid method call?

sub creaLog {
   my $self = shift;
   $self->mode( 'changed' );
}
[download]