sub nameoffucntion {
    my $recieved = shift;

    my $value = whatever;
 
    return $value;
}