The OpenNET Project / Index page

[ новости /+++ | форум | теги | ]

форумы  помощь  поиск  регистрация  майллист  ВХОД  слежка  RSS
"свёртка значений в строку в Perl"
Вариант для распечатки Архивированная нить - только для чтения! 
Пред. тема | След. тема 
Форумы Программирование под UNIX (Public)
Изначальное сообщение [Проследить за развитием треда]

"свёртка значений в строку в Perl"
Сообщение от r4 emailИскать по авторуВ закладки(??) on 29-Июл-04, 11:37  (MSK)
Отцы, напомните как сабж сделать?  ну есть у меня несколько скалярных переменных, мне из них надо сделать одну. ну и потом обратить это действие разумееца=) книжку дома забыл, а искать уже заколебался =)
  Рекомендовать в FAQ | Cообщить модератору | Наверх

 Оглавление

Индекс форумов | Темы | Пред. тема | След. тема
Сообщения по теме

1. "свёртка значений в строку в Perl"
Сообщение от ihor Искать по авторуВ закладки on 29-Июл-04, 11:48  (MSK)
$sep = ':';
$a = join($sep, ($b, $c, $d, $e));
($b, $c, $d, $e) = split(/$sep/, $a);


???

  Рекомендовать в FAQ | Cообщить модератору | Наверх

2. "свёртка значений в строку в Perl"
Сообщение от r4 emailИскать по авторуВ закладки(??) on 29-Июл-04, 11:53  (MSK)
>$sep = ':';
>$a = join($sep, ($b, $c, $d, $e));
>($b, $c, $d, $e) = split(/$sep/, $a);
>
>
>???

Ну это подручными средствами. Недостаток этого метода в том, что в строке может случайно встретица сепаратор.  По-моему была же какая то встроенная функция для этих целей.

ps. всёравно спасибо =)

  Рекомендовать в FAQ | Cообщить модератору | Наверх

3. "свёртка значений в строку в Perl"
Сообщение от ihor Искать по авторуВ закладки on 29-Июл-04, 12:27  (MSK)
$b = 12.2;
$c = -13;
$d = 14;
$e = "abce ghiklm n o p r s";
$f = "foo bar :  : : : 122";

$a = pack("fiin/a*n/a*", $b, $c, $d, $e, $f);
($b, $c, $d, $e, $f) = unpack("fiin/a*n/a*", $a);

  Рекомендовать в FAQ | Cообщить модератору | Наверх

4. "свёртка значений в строку в Perl"
Сообщение от r4 emailИскать по авторуВ закладки(??) on 29-Июл-04, 12:33  (MSK)
>$b = 12.2;
>$c = -13;
>$d = 14;
>$e = "abce ghiklm n o p r s";
>$f = "foo bar :  : : : 122";
>
>$a = pack("fiin/a*n/a*", $b, $c, $d, $e, $f);
>($b, $c, $d, $e, $f) = unpack("fiin/a*n/a*", $a);


аа. во. "fiin/a*n/a*" - как я понимаю - разделитель?

  Рекомендовать в FAQ | Cообщить модератору | Наверх

5. "свёртка значений в строку в Perl"
Сообщение от ihor Искать по авторуВ закладки on 29-Июл-04, 12:39  (MSK)
"fiin/a*n/a*" - описание формата:
f -- A single-precision float in the native format
i -- A signed integer value
a* -- A string with arbitrary binary data (will be null padded)
n/a* -- строка с указанием длины (n/), нужно, если подряд идут несколько строк


  Рекомендовать в FAQ | Cообщить модератору | Наверх

6. "свёртка значений в строку в Perl"
Сообщение от uldus Искать по авторуВ закладки(ok) on 30-Июл-04, 21:07  (MSK)
perldoc Data::Dumper или Storable

  Рекомендовать в FAQ | Cообщить модератору | Наверх


Удалить

Индекс форумов | Темы | Пред. тема | След. тема
Пожалуйста, прежде чем написать сообщение, ознакомьтесь с данными рекомендациями.




Партнёры:
PostgresPro
Inferno Solutions
Hosting by Hoster.ru
Хостинг:

Закладки на сайте
Проследить за страницей
Created 1996-2024 by Maxim Chirkov
Добавить, Поддержать, Вебмастеру