🚀 go-pugleaf

RetroBBS NetNews Server

Inspired by RockSolid Light RIP Retro Guy

Article View: es.comp.os.linux.programacion
Article #8810

[PERL]:¿donde está el script?

#8810
From: Marcos Dobarro Otero
Date: Wed, 09 Oct 2002 17:39
14 lines
1398 bytes
Buenas.
Buenas estoy haciendo un programa con perl. y me ha surgido una duda.
Sabe alguien como puedo saber desde el script donde esta el archivo 
ejecutable:

Por ejemplo:

un script en el directorio /home/yo/patan.pl que al ejecutarlo me devuelva:
/home/yo/
he provado con el comando pwd ejecutado desde el script pero me devuelve el 
directorio donde estoy yo y yo quiero que devuelva el directorio donde esta 
el script.

Muchas gracias.
Technical Details
Message-ID: <8lp1oa.883.ln@www.mardot.com>
Path: arc1-ca.pugleaf.net!archiver1.google.com!news1.google.com!newsfeed.stanford.edu!news.tele.dk!small.news.tele.dk!130.133.1.3!fu-berlin.de!uni-berlin.de!cm225052.red.mundo-r.COM!not-for-mail

Show Full Headers
Complete Article Headers
X-Google-Language: SPANISH,ASCII-7-bit
X-Google-Thread: f86c8,fd2077de17fa8475,start
X-Google-Attributes: gidf86c8,public
X-Google-ArrivalTime: 2002-10-09 11:01:34 PST
Path: arc1-ca.pugleaf.net!archiver1.google.com!news1.google.com!newsfeed.stanford.edu!news.tele.dk!small.news.tele.dk!130.133.1.3!fu-berlin.de!uni-berlin.de!cm225052.red.mundo-r.COM!not-for-mail
From: Marcos Dobarro Otero <mardot_esSPAM@terra.es>
Newsgroups: es.comp.os.linux.programacion
Subject: [PERL]:¿donde está el script?
Date: Wed, 09 Oct 2002 19:39:52 +0200
Lines: 14
Message-ID: <8lp1oa.883.ln@www.mardot.com>
Reply-To: mardot_esSPAM@terra.es
NNTP-Posting-Host: cm225052.red.mundo-r.com (213.60.225.52)
Mime-Version: 1.0
Content-Type: text/plain; charset=iso-8859-15
Content-Transfer-Encoding: 8Bit
X-Trace: fu-berlin.de 1034186491 19124063 213.60.225.52 (16 [142849])
X-Orig-Path: www.mardot.com!not-for-mail
User-Agent: KNode/0.7.1