Decouper une chaine en PERL

frans -  
jisisv Messages postés 3678 Statut Modérateur -
Salut a tous,

juste une question rapide a mon avis pour les forts en PERL

soit ma variable : $RAPPINTER

soit le contenu de ma variable : BELLAHSENE ANTHONY/CM VIALLE

je voudrais ne recuperer que la partie precedent la chaine /CM

je vois tres bien comment le faire dans d'autre langage mais la meme apres avoir fait un tour sur la patie cours du site je n'ai pas plus de reponse a ma question :o/
si qqn connait la syntaxe magique pour faire se decoupage je lui en serais tres reconnaissant !!!

merci,
Frans

2 réponses

  1. jisisv Messages postés 3678 Statut Modérateur 936
     
    La fonction split doit suffire dans ce cas
    (adapter si plusieurs champs)

    [johand@zoot] ~/tmp $cat bidon.pl
    #!/usr/bin/perl -w
    $mystring="BELLAHSENE ANTHONY/CM VIALLE";
    @res=split(/\// , $mystring);
    print $res[0];
    [johand@zoot] ~/tmp $./bidon.pl
    BELLAHSENE ANTHONY[johand@zoot] ~/tmp $

    Johan
    The software said "Requires Windows98, Win2000, or better,
    So I installed Unix.
    2
  2. jisisv Messages postés 3678 Statut Modérateur 936
     
    @res=split(/\/CM/ , $mystring);

    fonctionne aussi...

    The software said "Requires Windows98, Win2000, or better,
    So I installed Unix.
    2