[perl] comment peut on recuperer le repertoire courant

Marsh Posté le 27-11-2002 à 16:24:46

salut les amis

je voudrais recuperer le chemin du repertoire cournat dans lequel je travaille
existe t il une variable ou une commande pour obtenir cette info

merci

Marsh Posté le 27-11-2002 à 16:24:46

Marsh Posté le 27-11-2002 à 16:39:16

$repertoire = `pwd` (attention backquote = Alt Gr + 7)
ou system ('pwd';

Marsh Posté le 27-11-2002 à 16:40:04

spas possible sans execution d'un binaire externe ? :ouch:

Message édité par lorill le 27-11-2002 à 16:40:13

Marsh Posté le 27-11-2002 à 17:23:34

si tu travaille avec un server Web, regarde dans %env
tu trouveras ton bonheur
sinon je crois que pour ouvrir un fichier au meme endrois ou ce trouve le script Perl, il n'y a rien à faire
à tester :sweat:

---------------
Tout à commencé par un rêve...

Marsh Posté le 27-11-2002 à 19:00:17

Il y a une fonction getcwd dans le module Cwd :
http://www.perldoc.com/perl5.8.0/lib/Cwd.html

Marsh Posté le 28-11-2002 à 09:02:16

Pwd, c'est une commande qui risque de super trop mal marcher sous Windows si tu es sous cette plate-forme :lol:

Code :

use Cwd;
$RepCourant = cwd();

Et voilà !

---------------
Samsung Galaxy S1 -> Samsung Galaxy S2 -> Samsung Note 2 -> Huawei Ascend Mate 7 -> ZTE Axon 7 -> OnePlus 6T -> Oppo Find X2 PRO -> Google Pixel 9 PRO XL

Sujets relatifs:

Leave a Replay

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

Name *

Email *

URL

Message *