Untitled

    my $ref = jsonToObj($content);
    foreach my $element (@$ref) {
        $element->{'name'} =~ s/\\\\/\\/;
        $element->{'name'} =~ s/\\'/'/;
        $element->{'name'} =~ s/\\"/"/;
        $element->{'comment'} =~ s/\\\\/\\/;
        $element->{'comment'} =~ s/\\'/'/;
        $element->{'comment'} =~ s/\\"/"/;
        $message = "hai2u $element->{'name'} @ $element->{'timestamp'} : $element->{'comment'}";
        $irc->yield( privmsg => $channel => $message);
    }