Помогите извлеч IP и port от данного примера с помощью perl если в файле содержится такого рода информация
192.168.0.44.80
44.5.234.66.23
 и резултат записать в масив на выходе в таком виде:
192.168.0.44     80
44.5.234.66       23
Делаю я вот так,знаю что не совсем так, но если б знал как надо, не спрашивал бы, так что сильно не судите :
...
$ip = m/\d+\.\d+\.\d+\.\d+/;                                                                                            
                                                                                                                            
    $port = s/\d+\.\d+\.\d+\.\d+//  && s/\.//;                                                                                                         
                                                                                                                            
    @arr = ($ip,$port);                                                                                                     
                                                                                                                            
    print ("@arr\n");
... (меня интересует конкретно ета часть)

Не совсем понятно чего вы точно хотите, но думаю этот код вам поможет:

Почему при токай строке в програме 

$ip = m/\d+\.\d+\.\d+\.\d+/; 

при компиляции выдается для  $ip вот такой результат 1 , что как бы ip = 1, несмотря что ip адреса разные?

Это сообщение отредактировал(а) tcg2 - 6.4.2008, 21:41

tcg2, документацию прочтите по рег.выражениям.
Вместо = используйте =~

Это сообщение отредактировал(а) nitr - 6.4.2008, 22:21

Ну и так делал как велили все равно ему не нравится
Может еще раз попробуем, допустим строка такая:
 
 из нее нужно будет извлеч IP адрес и порт  
в таком примерно виде, с портом я разобрался, а с IP не могу:
 
 
...(Perl)  
$ip = m/\d+\.\d+\.\d+\.\d+/; при таком раскладе в качестве IP выдается '1'  
$ip =~ m/\d+\.\d+\.\d+\.\d+/;при таком раскладе в качестве IP выдается 'ничего'

а скобочки нигде не нужны?

З.ы $ip = m/\d+\.\d+\.\d+\.\d+/; при таком раскладе в качестве IP выдается '1'  
просто показывает , что регулярка найдена. 


ЗЫЫ 


Это сообщение отредактировал(а) shamber - 7.4.2008, 11:45

А как разбить строчку, например...

Так что-бы каждая цифра 192, 168,  20, 0/24 была отдельной переменной?

Спасибо искренее! Выручили, все работает!

Loki, 

в переменных $1, $2, $3 и $4 будет то что надо.
А так идите в раздел почитайте.

Ок, а может еще идею подкините...
Нужно все это складывать таким образом в ексель, что калонки $1 $2 $3 $4 уже заполнены и нужно найти совпадение всех четырех значений в строке, покрасить это строку.

тебе уже в раздел в VBA пора

tolkien, почему же, перл разочулся работать с Excel?
Loki, по правилам форума - новую тему. И когда создадите, постарайтесь более вразуметельно задать вопрос.

Ребята, выручитеще раз?
Есть такая строка, нужно записать в переменную, все что находится, взято на чтение с конца к началу до первого пробела, или короче($_ = 1160):

или


Это сообщение отредактировал(а) KSURi - 21.4.2008, 11:49

Это сообщение отредактировал(а) tishaishii - 23.4.2008, 16:02