perl : supprimer dernier caractère de ARGV[0] si /

perl : supprimer dernier caractère de ARGV[0] si / - Codes et scripts - Linux et OS Alternatifs

Marsh Posté le 11-11-2013 à 22:15:23    

salut,
 
voilà ma variable :
my $rep = $ARGV[0];
 
l'utilisateur devra rentrer un chemin donc si par exemple il rentre :
/home/user/Documents/
 
je voudrais que le script supprime le dernier /  
et si il rentre
/home/user/Documents
 
alors tout est ok...
 
j'imagine que c'est avec un grep que je peux faire ça mais comment l'appliquer ??
 
merci

Reply

Marsh Posté le 11-11-2013 à 22:15:23   

Reply

Marsh Posté le 11-11-2013 à 22:27:16    

Je t'invite à regarder les tutoriels de bases et les docs sur les manipulations de string sous perl. Si tu es sous perl, pas la peine d'utiliser grep, tu as tout à ta dispo dans le langage en lui même.
http://perldoc.perl.org/index-tutorials.html

 

https://www.google.fr/search?q=perl [...] e+last+%2F
http://perldoc.perl.org/File/Basename.html
https://www.google.fr/search?q=perl [...] +character
http://perldoc.perl.org/functions/chop.html


Message édité par o'gure le 11-11-2013 à 22:30:09

---------------
Relax. Take a deep breath !
Reply

Marsh Posté le 11-11-2013 à 23:02:20    

j'ai bien réussi en faisant  
chop ($rep) mais ça supprime le dernier caractère quel qu’il soit.  
Peut-on faire un "si dernier caractère = / alors chop()" ?

Reply

Marsh Posté le 12-11-2013 à 08:04:11    

chop "returns the character chopped".


---------------
Relax. Take a deep breath !
Reply

Sujets relatifs:

Leave a Replay

Make sure you enter the(*)required information where indicate.HTML code is not allowed