From chatty at intuilab.com  Tue Jun 28 03:08:18 2005
From: chatty at intuilab.com (Stephane Chatty)
Date: Tue, 28 Jun 2005 12:08:18 +0200
Subject: [Toulouse-pm] Retrouver le nom d'une sub
Message-ID: <20050628100819.3F8BF47657@smtp.intuilab.com>



Bonjour,

brisons le long silence sur Toulouse-pm par une question un peu tordue. Je 
re?ois une r?f?rence sur une sub, et je voudrais trouver son nom. Est-ce 
possible, et si oui comment ?

En gros :

my $var = shift;
if (ref $var eq 'CODE') {
  print id ($var), "\n";
}

Et il reste ? trouver la fonction id qui retourne "anonymous sub" ou "foo" ou 
"Bar::baz" selon les cas.

Des suggestions ?

St?phane Chatty
IntuiLab



From philippe.bruhat at free.fr  Tue Jun 28 03:34:40 2005
From: philippe.bruhat at free.fr (Philippe 'BooK' Bruhat)
Date: Tue, 28 Jun 2005 12:34:40 +0200
Subject: [Toulouse-pm] Retrouver le nom d'une sub
In-Reply-To: <20050628100819.3F8BF47657@smtp.intuilab.com>
References: <20050628100819.3F8BF47657@smtp.intuilab.com>
Message-ID: <20050628103440.GA16649@localhost.localdomain>

Le mardi 28 juin 2005 ? 12:08, Stephane Chatty ?crivait:
> 
> 
> Bonjour,
> 
> brisons le long silence sur Toulouse-pm par une question un peu tordue. Je 
> re?ois une r?f?rence sur une sub, et je voudrais trouver son nom. Est-ce 
> possible, et si oui comment ?
> 
> En gros :
> 
> my $var = shift;
> if (ref $var eq 'CODE') {
>   print id ($var), "\n";
> }
> 
> Et il reste ? trouver la fonction id qui retourne "anonymous sub" ou "foo" ou 
> "Bar::baz" selon les cas.
> 
> Des suggestions ?

Sub::Identify ?

-- 
 Philippe "BooK" Bruhat

 When the employee is a fool, so is the employer.
                                    (Moral from Groo The Wanderer #26 (Epic))

From chatty at intuilab.com  Tue Jun 28 04:17:21 2005
From: chatty at intuilab.com (Stephane Chatty)
Date: Tue, 28 Jun 2005 13:17:21 +0200
Subject: [Toulouse-pm] Retrouver le nom d'une sub
In-Reply-To: Message from philippe.bruhat@free.fr (Philippe 'BooK' Bruhat) 
	of "Tue, 28 Jun 2005 12:34:40 +0200."
	<20050628103440.GA16649@localhost.localdomain> 
Message-ID: <20050628111722.36CBB47657@smtp.intuilab.com>



> Sub::Identify ?

Super, merci ! Visiblement, je ne sais pas bien chercher dans CPAN. Pourtant 
j'avais presque tous les bons mots cl?s :-/

Au passage je d?couvre le module B, que je ne connaissais pas.

Merci encore,

St.



From mirod at xmltwig.com  Thu Jun 30 02:41:47 2005
From: mirod at xmltwig.com (Michel Rodriguez)
Date: Thu, 30 Jun 2005 11:41:47 +0200
Subject: [Toulouse-pm] Le lieng du jour: annoCPAN
Message-ID: <42C3BE5B.3090903@xmltwig.com>

Salut,

Ca faisait longtemps, donc voici le lien du jour: http://annocpan.org/ 
qui permet d'annoter la doc de modules sur CPAN. Une bonne idee, on va 
voir si ca prends.

Sinon la semaine derniere j'ai ete a l'Italian Perl Workshop, 2eme du 
nom, ou j'ai ete ridicule en etant le seul presenteur a causer anglais. 
Je mettrais les slides en ligne bientot, j'ai cause de la "Perl 
Community", et de... XML::Twig! Surprise! Ils ont meme du m'evacuer de 
la scene de force, sinon j'y serais encore (mon talk initial de 20mn a 
ete pousse a 50, et encore j'ai presente que la moitie de ce que j'avais
prevu).

-- 
Michel Rodriguez
Perl &amp; XML
xmltwig.com