conserver mon tabeau

Marc Chantreux marc.chantreux at ulpmm.u-strasbg.fr
Mon Apr 21 16:30:58 CEST 2008


salut a tous,

soit la fonction suivante:

cpan_to_deb_name () {
    typeset -a v
    v=( ${(L)@//::/-} )
    print -l lib-$^v-perl
}


> cpan_to_deb_name Algorithm::CheckDigits::M43_001
lib-algorithm-checkdigits-m43_001-perl 

v n'existe que parceque je n'ai pas ete foutu d'ecrire qqchose du genre 

cpan_to_deb_name () { print -l lib-$^{(L)@//::/-}-perl }

mais moi je suis nul et je suis sur que l'un d'entre vous saura ou j'ai
fauté dans mes diffétentes tentatives.

bien cordialement,

ps: désolé pour le cross-posting mais je compte proceder ainsi tant que
les deux responsables de listes n'auront pas trouvé de solution.

-- 
Marc Chantreux
BibLibre, expert en logiciels libres pour l'info-doc
http://biblibre.com


More information about the Shell mailing list