sub _nameoffucntion {
my $self = shift;
my $recieved = shift;

some function

return $value;
}