17.11.2007, 12:24
|
|
Постоянный
Регистрация: 09.07.2006
Сообщений: 553
Провел на форуме:
7561206
Репутация:
1861
|
|
Сообщение от demonoid
Код:
#!perl
use strict;
use warnings;
open(my $SITES,"sites.txt") ;
while( <$SITES> )
{
chomp;
print "$_ \n";
}
sites.txt
Код:
192.168.0.1
192.168.0.2
192.168.0.3
192.168.0.4
Код:
C:\>s.pl
192.168.0.1
192.168.0.2
192.168.0.3
192.168.0.4
Конечно спасибо...
Но этим способом мы уже реализовывали, мне нужно указать ошибки в моем коде...
|
|
|