|
|
ru.cgi.perl- RU.CGI.PERL ------------------------------------------------------------------ From : Alexander Bolotnov 2:5052/4.82 04 Aug 2001 11:56:58 To : Andrew Mikhailov Subject : новичок -------------------------------------------------------------------------------- 04 Aug 01, Andrew Mikhailov -> All: > #!/usr/local/bin/perl > open(PASS, "2.txt") || die "Файл не найден!"; > while(<PASS>) > {print;} > close(PASS); > 1. Как заменить 2.txt на параметр который я передам при запуске этого > 1.pl ? смотря как запускать, но если эхотажно, то perldoc CGI; > 2. Как вместо принт сделать обработку которая будет мне в каждой > сточке удалять три первых символа и печатать то что получилось. perldoc -f substr; > 3. Если я к примеру запущу программу (уже с п.2) так : 1.pl >2.txt то > правильно ли я понимаю чтов 3.txt запишется обработанный по пункту 2 > файл ? нет :) в 3.txt ничего не запишется. а вообще, попробовать-то никак? Alexander Bolotnov. Scientia vincere tenebras. --- * Origin: http://home.mari-el.ru/ls/ (2:5052/4.82) Вернуться к списку тем, сортированных по: возрастание даты уменьшение даты тема автор
Архивное /ru.cgi.perl/27883b6be38d.html, оценка из 5, голосов 10
|