|
ru.perl
- RU.PERL ----------------------------------------------------------------------
From : Konstantin Tokar 2:5020/400 07 Feb 2001 13:44:59
To : All
Subject : Re: узнать текущую директорию
--------------------------------------------------------------------------------
> > За такие тоже. use Cwd.
>
> Читаем man 3 Cwd -> The getcwd() function re-implements the getcwd(3) (or
> getwd(3)) functions in Perl.
>
> Читаем man 3 getcwd -> If the environment variable PWD is set, and its value
> is correct, then that value will be returned.
А если не установлена?
>
> Так что не все так плохо, как кажется на первый взгляд... Да и мой совет
> отбить руки относится больше к вызову внешней программы.
Вот простая программа для тестирования:
#!perl
use strict;
use Cwd;
chdir('/');
print "\$ENV{'PWD'}=",$ENV{'PWD'},"\n";
print "cwd=",cwd,"\n";
foreach(sort keys %ENV){
print "$_\t-> $ENV{$_}\n";
}
--
Konstantin Tokar (http://www.mpei.ac.ru/tokar)
--- ifmail v.2.15dev5
* Origin: Demos online service (2:5020/400)
Вернуться к списку тем, сортированных по: возрастание даты уменьшение даты тема автор
|
