Модераторы: korob2001, ginnie
  

Поиск:

Ответ в темуСоздание новой темы Создание опроса
> передача адреса файловому дескриптору, передача адреса файловому дескриптору 
:(
    Опции темы
de43gy
Дата 11.8.2014, 18:04 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Новичок



Профиль
Группа: Участник
Сообщений: 2
Регистрация: 11.8.2014

Репутация: нет
Всего: нет



есть строчка с открытием файла:

open FILE, FILENAME || die "can't open file: " . FILENAME;

нужно ей передать имя, сожержащееся в двух переменных:
 ${$ARRAY[0]}[0] и ${$ARRAY[0]}[1] 
(там адрес и название файла) , как правильно это сделать? Пока единственное, что пришло в голову - объеденить в еще одной переменной и ее уже подставлять....

PM MAIL   Вверх
arto
Дата 11.8.2014, 20:24 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Эксперт
***


Профиль
Группа: Завсегдатай
Сообщений: 1495
Регистрация: 31.10.2004

Репутация: 38
Всего: 40



что такое "адрес файла"?
PM MAIL ICQ   Вверх
de43gy
Дата 11.8.2014, 21:25 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Новичок



Профиль
Группа: Участник
Сообщений: 2
Регистрация: 11.8.2014

Репутация: нет
Всего: нет



путь к нему.

к примеру тут в ${$ARRAY[0]}[0] будет "/usr/scripts/perl/"
а в ${$ARRAY[0]}[1]  будет  "file4.txt"
мне же дескриптору нужно передать имя файла с полным путем к нему, т.е. /usr/scripts/perl/file4.txt

я тут подумал, что можно было бы сделать проще и не хранить эти значения в разных переменных. Но уже просто интересно, как можно в команде 
open FILE, FILENAME || die "can't open file: " . FILENAME;
объеденить значения тех переменных, что бы передать полный путь к файлу.
PM MAIL   Вверх
noize
Дата 11.8.2014, 23:17 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


5.18.2
*


Профиль
Группа: Участник
Сообщений: 89
Регистрация: 10.7.2010
Где: СПб

Репутация: 3
Всего: 3



Код

open my $file, '<', $ARRAY[0]->[0] . $ARRAY[0]->[1] or die "can't open file: $!"

PM MAIL   Вверх
  
Ответ в темуСоздание новой темы Создание опроса
Правила форума "Perl"
korob2001
sharq
  • В этом разделе обсуждаются общие вопросы по языку Perl
  • Если ваш вопрос относится к системному программированию, задавайте его здесь
  • Если ваш вопрос относится к CGI программированию, задавайте его здесь
  • Интерпретатор Perl можно скачать здесь ActiveState, O'REILLY, The source for Perl
  • Справочное руководство "Установка perl-модулей", можно скачать здесь


Если Вам понравилась атмосфера форума, заходите к нам чаще! С уважением, korob2001, sharq.

 
0 Пользователей читают эту тему (0 Гостей и 0 Скрытых Пользователей)
0 Пользователей:
« Предыдущая тема | Perl: Общие вопросы | Следующая тема »


 




[ Время генерации скрипта: 0.0665 ]   [ Использовано запросов: 22 ]   [ GZIP включён ]


Реклама на сайте     Информационное спонсорство

 
По вопросам размещения рекламы пишите на vladimir(sobaka)vingrad.ru
Отказ от ответственности     Powered by Invision Power Board(R) 1.3 © 2003  IPS, Inc.