![]() |
|
Модераторы: korob2001, ginnie |
![]()
|
|
| Fuksito |
|
|||
|
Новичок Профиль Группа: Участник Сообщений: 11 Регистрация: 28.2.2008 Репутация: нет Всего: нет |
Вот есть такой дамп хеша
$all : $VAR1 = { '*Fh::fh00001cascada_-_bad_boy.mp3' => { 'info' => { 'Content-Type' => 'audio/mpeg', 'Content-Disposition' => 'form-data; name="item[avatar]"; filename="cascada_-_bad_boy.mp3"' }, 'name' => bless( do{\(my $o = '.\\CGItemp35533')}, 'CGITempFile' ), 'hndl' => bless( \*{'Fh::fh00001cascada_-_bad_boy.mp3'}, 'Fh' ) } }; Как вот получить в переменную значение '*Fh::fh00001cascada_-_bad_boy.mp3' или в другую уже переменную hndl' => bless( \*{'Fh::fh00001cascada_-_bad_boy.mp3'}, 'Fh' ) и что єто за 'Fh' ) или 'CGITempFile' ), |
|||
|
||||
| ginnie |
|
|||
![]() Эксперт ![]() ![]() ![]() Профиль Группа: Комодератор Сообщений: 1287 Регистрация: 6.1.2008 Где: Москва Репутация: 38 Всего: 49 |
Fuksito, постарайтесь яснее выразить, что Вам нужно.
-------------------- Написать код, понятный компьютеру, может каждый, но только хорошие программисты пишут код, понятный людям. (Мартин Фаулер. Рефакторинг) |
|||
|
||||
| Fuksito |
|
|||
|
Новичок Профиль Группа: Участник Сообщений: 11 Регистрация: 28.2.2008 Репутация: нет Всего: нет |
Ну вот как записать в переменную к примеру $var значение *Fh::fh00001cascada_-_bad_boy.mp3
Ясно?) |
|||
|
||||
| arto |
|
|||
|
Эксперт ![]() ![]() ![]() Профиль Группа: Завсегдатай Сообщений: 1495 Регистрация: 31.10.2004 Репутация: 38 Всего: 40 |
(keys %$all)[0] ?
|
|||
|
||||
| nitr |
|
|||
![]() Эксперт ![]() ![]() ![]() ![]() Профиль Группа: Участник Клуба Сообщений: 2543 Регистрация: 10.2.2006 Где: Россия :) Репутация: 37 Всего: 84 |
Fuksito, вам что конкретно требуется? Сам файл сохранить или его содержимое? Или только имя определить? Или просто разбор этой переменной?
Большинство значений это ссылки на что-либо. Думаю вам надо более подробно сказать, что используете, какие цели. Т.к. неясен, например, используемый модуль |
|||
|
||||
![]()
|
| Правила форума "Perl" | |
|
|
Если Вам понравилась атмосфера форума, заходите к нам чаще! С уважением, korob2001, sharq. |
| 0 Пользователей читают эту тему (0 Гостей и 0 Скрытых Пользователей) | |
| 0 Пользователей: | |
| « Предыдущая тема | Perl: Общие вопросы | Следующая тема » |
|
|
По вопросам размещения рекламы пишите на vladimir(sobaka)vingrad.ru
Отказ от ответственности Powered by Invision Power Board(R) 1.3 © 2003 IPS, Inc. |