VPF::перевести функцию PHP->Perl - Форум программистов

Дата 6.1.2009, 22:42 (ссылка)

(нет голосов)

Загрузка ...

Шустрый

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

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

парсинг hex-кода

Код


for ($i=0; $data{$i}!="\x00"; $i++) {
    $string .= $data{$i};
}

мало представляю себе как это должно выглядеть на Perl...

Это сообщение отредактировал(а) Smith - 6.1.2009, 22:43

Дата 6.1.2009, 23:36 (ссылка)

(нет голосов)

Загрузка ...

Шустрый

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

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

простите....а это на чем????

Дата 7.1.2009, 01:19 (ссылка)

(нет голосов)

Загрузка ...

Опытный

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

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

Smith, вы знаете, Perl - уникальный язык!
Он настолько интелектуален, что можно просто вставлять ваш код и все будет работать!

Код


for ($i=0; $data{$i}!="\x00"; $i++) {
    $string .= $data{$i};
}

Это сообщение отредактировал(а) sir_nuf_nuf - 7.1.2009, 01:20

--------------------

Дата 11.1.2009, 17:11 (ссылка)

(нет голосов)

Загрузка ...

Шустрый

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

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

Цитата(sir_nuf_nuf @ 7.1.2009, 01:19)

Код


for ($i=0; $data{$i}!="\x00"; $i++) {
    $string .= $data{$i};
}

да, забыл сказать, что $data это строка а не массив)

Дата 11.1.2009, 17:31 (ссылка)

(голосов:1)

Загрузка ...

Опытный

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

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

Код


foreach(split $data) {
  last if $_ eq "\x00";
  $string .= $_
}

--------------------

Died at Life.pl line 21

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