URL: https://www.opennet.me/cgi-bin/openforum/vsluhboard.cgi
Форум: vsluhforumID9
Нить номер: 1450
[ Назад ]

Исходное сообщение
"perl trouble"
Отправлено Mercurius , 04-Мрт-03 14:23

странная фигня
кусок кода:
    $command = 'blablabla';  # некая команда
    @configs = split ('\n',`$command`);
    $m = $#configs;
    if ($m > 1) {
      foreach $j (@configs) {
       ($k,$creationtime) = split (/./,$j);
Первый split отрабатывает нормально, парся мне в @configs вывод команды $command, все харащо. А вторая команда нихрена не работает. $k и $creationtime остаются пустыми.
Перл маздайный (ActivePerl) - тут юникса нет, приходится маздайствовать...

Содержание

RE: perl trouble,pth, 15:37 , 04-Мрт-03
- RE: perl trouble,Mercurius, 16:20 , 04-Мрт-03

Сообщения в этом обсуждении

"RE: perl trouble"
Отправлено pth , 04-Мрт-03 15:37

>странная фигня
>кусок кода:
>
>    $command = 'blablabla';  # некая команда
>    @configs = split ('\n',`$command`);
>    $m = $#configs;
>    if ($m > 1) {
>      foreach $j (@configs) {
>       ($k,$creationtime) = split (/./,$j);
>
>Первый split отрабатывает нормально, парся мне в @configs вывод команды $command, все
>харащо. А вторая команда нихрена не работает. $k и $creationtime остаются
>пустыми.
>Перл маздайный (ActivePerl) - тут юникса нет, приходится маздайствовать...

split(/\./, $j) # "." - это "любой символ"

"RE: perl trouble"
Отправлено Mercurius , 04-Мрт-03 16:20

>
>
>split(/\./, $j) # "." - это "любой символ"
Блин, заработало! Спасибо всем огромное!
Не знал что /./ - это любой символ. Дальше буду RTFM-ить ;))