Bonjour,
 
En langage Perl, je voudrais dans l'environnement Windows, récupérer le path de lancement d'une application à partir de son nom.
Par exemple, si j'execute l'application toto.exe du répertoire c:\temp, je voudrais récupérer c:\temp
 
Merci

je compredn pas trop ce que tu veux
 
tu est dans l'application en question? ou c'est une appli externe dont tu connais le nom complet (path+nom) ?

use Cwd;
 
print "le repertoire de lancement est ", cwd(), "\n";
1;

bernix : ce n'est pas possible.

phoenix a raison, si tu veux le répertoire courant, c'est Cwd qu'il faut utiliser

Ben oui mais sauf que si j'ai bien compris ce n'est pas ce qu'il veut. Il veut le path du programme qu'il a lancé. Qui peut évidemment être différent du répertoire courant du programme en question.
 
Et ça, c'est pas possible.

avec $0 (zero) tu a le nom complet du script que tu a lancé
 
apres pour recuperer le chemin une simple regexp suffit

Tu n'as pas le nom complet, tu as seulement la commande qui a été tapée. C'est completement inutile si tu lances une commande du PATH, et completement inutile aussi si tu lances la commande avec un chemin relatif.
 
Pourquoi personne ne me croit quand je dis que c'est impossible ?

Pas la peine de se casser le cul: le mec n'a pas repondu à un seul post de ce topic, il n'en a rien à branler...
 
C'est lourd ce genre de type...

Bon au cas ou ca interesse quand meme du monde. Pour avoir le passe vers le script lance, il suffit d'utiliser le module FindBin, par exemple:
use FindBin;
print "le script se trouve dans le dossier :", $FindBin::Bin, "\n";