Notez que pour une raison qui m'échappe, weblogues.com ne répond pas positivement.
#!/usr/bin/perl
#
# Copyright (c) 2006 Mathieu Roy <yeupou--gnu.org>
# http://yeupou.coleumes.org
#
# This program is free software; you can redistribute it and/or modify
# it under the terms of the GNU General Public License as published by
# the Free Software Foundation; either version 2 of the License, or
# (at your option) any later version.
#
# This program is distributed in the hope that it will be useful,
# but WITHOUT ANY WARRANTY; without even the implied warranty of
# MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
# GNU General Public License for more details.
#
# You should have received a copy of the GNU General Public License
# along with this program; if not, write to the Free Software
# Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA 02111-1307
# USA
#
# $Id: perl-template.pl,v 1.5 2006/02/25 14:00:21 moa Exp $
use strict;
use RPC::XML;
use RPC::XML::Client;
use Data::Dumper;
use Unicode::String;
# Config - strings must be valid utf8
my $blogname = "XXXXX";
my $blogurl = "http://XXXXX";
my @servers = ("http://www.weblogues.com/ping",
"http://rpc.technorati.com/rpc/ping",
"http://rpc.weblogs.com/RPC2");
# Run
for (@servers) {
print "Do $_\n";
my $cli = RPC::XML::Client->new($_);
my $response = $cli->send_request('weblogUpdates.ping', $blogname, $blogurl);
print "--> ".(Dumper $response->value)
if ref $response and $response->is_fault;
print "--> ".$response->value->{message}."\n"
if ref $response and !$response->is_fault;
print "--> ".$response."\n"
unless ref $response;
}
# je suis désolé
Posté par Entaxeime . Évalué à 5.
Je sais ce qu'est un ping, mais quel est le rapport avec la mise à jour du site?
[^] # ben moi aussi
Posté par Anonyme . Évalué à 3.
[^] # Re: ben moi aussi
Posté par Entaxeime . Évalué à -2.
[^] # Re: ben moi aussi
Posté par fabien . Évalué à 6.
[^] # Re: ben moi aussi
Posté par Cali_Mero . Évalué à 3.
[^] # Re: ben moi aussi
Posté par Cali_Mero . Évalué à 5.
C'est à vous dégouter de partager du code, ce genre de réaction. C'est plutôt à vous de vous ouvrir !
(gnap gnap, va donc contribuer ailleurs la prochaine fois. L'audience ici n'est pas à la hauteur).
[^] # Re: ben moi aussi
Posté par Boa Treize (site web personnel) . Évalué à 3.
Quant au journal lui-même, mes réactions ont été :
* C'est quand même moche, le Perl
* Wouah, 50% de licence, 50% de code
* Ça n'a aucun intérêt de poster ça ici, dans deux jours ça aura disparu aux oubliettes
Mais vu que globalement le truc m'indifférait, je n'ai posté de commentaire pour les exprimer, et j'ai passé mon chemin.
[^] # Re: ben moi aussi
Posté par Cali_Mero . Évalué à 1.
Voilà, pour ceux qui découvrent le sujet.
[^] # Re: ben moi aussi
Posté par Boa Treize (site web personnel) . Évalué à 4.
D'une part, il ne s'est pas fait lyncher : il a écrit deux commentaires en réponse à d'autres commentaires qui ont eu de très mauvaises notes. D'autre part ces mauvaises notes ne sont pas dues au fait qu'il propose du code source libre, mais au contenu des commentaires eux-mêmes.
Manifestement, et bien que vous disiez le contraire, toi (Cali_Mero) et gnap gnap (yeupou) portez une trop grande attention aux scores des commentaires.
[^] # Re: ben moi aussi
Posté par fabien . Évalué à 3.
a savoir que je n'ai pas voté une seule fois negatif sur ce thread, je suis ravi que qqun poste du code source, un grand merci a gnap gnap.
J'etais particulierement d'accord avec le 1er commentaire de Entaxeime , et j'ai voté (+) ca dois être la seule fois je crois.
la reponse de l'auteur ne m'a pas senblé être tres .. heu.. ouverte :) et je n'ai pas voté, respectant son droit de reponse, auquel j'ai repondu de maniere un peu plus piquante que le 1er, pour suciter une reflexion chez l'auteur.
Je n'ai jamais critiqué le fait que du code ai été posté ici.
Je suis désolé que celà ai été mal pris, je presente mes excuses a gnap gnap, je ne pensais pas que celà puisse prendre autant d'ampleur.
Je reste persuadé qu'un peu plus d'info aurait été sympas, j'aurai pas réussi a le faire comprendre a tout le monde, mais ca ne m'empeche pas de dormir.
[^] # je suis chanceux
Posté par Anonyme . Évalué à -4.
Oulala, j'ai « de la chance qu'on ne puisse pas voter les journaux » !
[^] # Re: je suis chanceux
Posté par fabien . Évalué à 8.
Non, mais t'as raison, tiens, je vais donner un bout de code RPL que je vais sortir de ma vielle hp, et dés qu'un pekin me demandera ce que ca fait, ben je lui dirait : "si tu ne sais pas ce que c'est que t'en a pas besoin". vachement constructif...
[^] # Re: ben moi aussi
Posté par JereMe . Évalué à 10.
Personnellement, je viens souvent ici pour découvrir des nouveaux trucs. En général je ne sais pas ce que c'est mais ca devient parfois par la suite un truc indispensable pour moi.
Je pense que tu aurais pu profiter de ce commentaire pour éclairer sa lanterne.
Un journal est peut être plus qu'une "page entière", dans le sens où tu touches un large public, et pas forcément concerné.
Tu aurais mis ca sur le wiki de weblogues par exemple, il eût été plus normal de ne pas mettre d'explications.
Sinon, tu as raison, avec google, on trouve ce que veux dire ton message. Idem que pour le langage SMS donc, on comprend si on se donne la peine. Super.
Bref utechnorati et consort, = ce qu'on appelle un serveur de ping, ca référence les mises à jours de blogues. Il faut pour cela que les blogs disposent d'une fonctionnalités pour envoyer un "ping" (une notification) au serveur. Les blogs "courants" ont souvent cette fonctionnalitée(http://www.weblogues.com/wiki/index.php?n=Main.Blogiciel ).
Mais si on a fait soit même son blog en perl, ben on peut utiliser ce code. Voila.
Personnellement, ca m'a fait découvrir une utilisation concrète de XML-RPC (http://fr.wikipedia.org/wiki/XML-RPC ).
[^] # Vous êtes de boulays les gars.
Posté par schyzomarijks . Évalué à 1.
Et pour ceux qui ne comprendrais pas, ca fait un excellent TP pour comprendre. (TP=travaux pratique)
Franchement, quand je vois vos commentaires, quand je regarde le niveau de certaines questions sur les forums. Ca me débecte. Même en prestation pour une SSII, on traite mieux les prestataires.
Apprenez à être curieux de tout.
Essayez de comprendre par vous même.
Je suis CERTAIN que si vous aviez posé une question précise sur le code ( genre je ne comprends pas ce que fait my $cli = RPC::XML::Client->new($_); c'est pas très explicite dans la doc) yeupou< s'aurait fait un plaisir de vous répondre.
Et si vous n'avez pas le temps, passez votre chemin (ou mieux, bookmarké pour y revenir plus tard.)
Tout ne vous viendra pas tout cuit dans le bec.
[^] # Re: Vous êtes de boulays les gars.
Posté par schyzomarijks . Évalué à 0.
"Voici un script de ping pour technorati et consort,"
hum, ok, je ne comprends pas.
"au cas où ça interesse quelqu'un pour signaler à ces site la mise à jour de son blog,"
Ok, c'est pour signaler la mise à jour de son blog.
Je n'ai pas de blog, donc ca ne m'intéresse pas. Je passe mon chemin.
[^] # Re: Vous êtes de boulays les gars.
Posté par Boa Treize (site web personnel) . Évalué à 5.
Quand je vote, je juge la pertinence du commentaire, et pas du journal, de la personne ou du contexte.
J'ai trouvé que beaucoup de commentaires sur ce journal étaient inutiles, dont les tiens, et quelques uns pertinents. J'ai voté en conséquence.
# pour DotClear
Posté par gradix . Évalué à 8.
Suivre le flux des commentaires
Note : les commentaires appartiennent à celles et ceux qui les ont postés. Nous n’en sommes pas responsables.