sub reverse_word() {
    my $word = shift;
    my $reversedword = scalar reverse $word;
    return $reversedword;
}

##</code><code>##

sub reverse_word() {
    return scalar reverse shift;   
}