|
|
ru.perl- RU.PERL ---------------------------------------------------------------------- From : Leonid Subbotin 2:5007/16.1 16 Jun 2000 12:21:30 To : Pavel Kurnosoff Subject : <STDIN> -------------------------------------------------------------------------------- LS>> Существует-ли в природе фильтр/парсер subj'a ? Hадо обрабатывать LS>> 0x08 (bs), курсоры и пр. Вобщем-то уже свой почти дописал, а LS>> потом подумал вдруг... PK> Term::Readline? делаем ------ #!/usr/bin/perl use Term::ReadLine; $term = new Term::ReadLine 'my line'; open(F, ">/home/mytestfile"); print F $term->readline(); close(F); пишем "test<bs><bs>test test<cursor left>test<enter>" получаем (hex dump "/home/mytestfile") -------- 74 65 73 74 08 08 74 65 73 74 20 74 65 73 74 1B 5B 44 74 65 73 74 ^^ ^^ ^^ ^^ ^^ <2 bs> (cur left) ps: скрипт запустился из mgetty, а я залез t-mail'овской терминалкой. Всегда с вами Sln ! --- GoldED+/W32 1.1.4 * Origin: Sln Station (2:5007/16.1) Вернуться к списку тем, сортированных по: возрастание даты уменьшение даты тема автор
Архивное /ru.perl/206853949c784.html, оценка из 5, голосов 10
|