Справочник функций

Ваш аккаунт

Войти через: 
Забыли пароль?
Регистрация
Информацию о новых материалах можно получать и без регистрации:

Последние темы форума

Показать новые сообщения »

Почтовая рассылка

Подписчиков: 6484
Последний выпуск: 19.06.2015

Замена строчки в файле

10K
05 июня 2013 года
trinitro
48 / / 14.06.2010
При применении такого кода:


 
Код:
open (IF, "/var/www/d-link/switch150.cfg");
open (OF, ">/var/www/d-link/switch150.cfg");

while (<IF>)
    {
        chomp;
        s/account admin//ig;
    }

close (IF);
close (OF);
файл очищается полностью, вместо замены одной строки. Хотя так:

 
Код:
# perl -e 's/account admin//g' -pi switch150.cfg
срабатывает. Подскажите пожалуйста, что поправить?

Знаете кого-то, кто может ответить? Поделитесь с ним ссылкой.

Ваш ответ

Реклама на сайте | Обмен ссылками | Ссылки | Экспорт (RSS) | Контакты
Добавить статью | Добавить исходник | Добавить хостинг-провайдера | Добавить сайт в каталог