|
ru.cgi.perl
- RU.CGI.PERL ------------------------------------------------------------------
From : Vladimir Podgorny 2:5020/400 31 Mar 2002 21:39:38
To : Vladimir Podgorny
Subject : Re: помогите, пожалуйста!
--------------------------------------------------------------------------------
Vladimir Podgorny <raven@cemetery.org.ua> wrote:
> Sasha Balandin <Sasha.Balandin@p30.f248.n5010.z2.fidonet.org> wrote:
>> Привет тебе, All!
>
> =pod
> perldoc perlre
> perldoc perlopentut
> perldoc -f print
> =cut
>
> use IO::File qw();
> use Fcntl qw(:DEFAULT);
>
> my $file = new IO::File '/fully/qualified/file/name', O_RDONLY or die "$!";
Sorry - вместо :q! настучал :wq! :( Hу раз уж назвался груздем...
use CGI qw();
my $cgi = new CGI;
print $cgi->CGI::header();
my $user = $cgi->CGI::param('user') || '.*';
while (<$file>) {
print if /\buser='$user'\b/;
}
> undef($file);
>
>> Hарод! сабж! у меня такой вопрос: как можно написать скрипт, который выполнял
>> бы следующие: у нас есть файл data.base в этом файле есть строчни
>> ....
>> 05/08 23:30:24 ##### data dev=ttyS1, pid=453, caller='none',
>> conn='16800/ARQ/V34/LAPM/V42BIS', name='', cmd='/bin/login', user='test123'
>>
>> 05/08 23:32:24 ##### data dev=ttyS1, pid=453, caller='none',
>> conn='16800/ARQ/V34/LAPM/V42BIS', name='', cmd='/bin/login', user='vova'
>>
>> 05/08 23:34:24 ##### data dev=ttyS1, pid=453, caller='none',
>> conn='16800/ARQ/V34/LAPM/V42BIS', name='', cmd='/bin/login', user='sasha'
>>
>> 05/08 23:35:24 ##### data dev=ttyS1, pid=453, caller='none',
>> conn='16800/ARQ/V34/LAPM/V42BIS', name='', cmd='/bin/login', user='yuri'
>> ......
>>
>> на сраничке index.htm вводим любое слово, например test123
>> и он нам выдает строчку
>>
>> 05/08 23:30:24 ##### data dev=ttyS1, pid=453, caller='none',
>> conn='16800/ARQ/V34/LAPM/V42BIS', name='', cmd='/bin/login', user='test123'
>>
>>
>> _Alexander_
>> sashabal@cd-club.ru
>> 2:5010/248.30
>>
>>
>
> --
> VP992-RIPE
--
VP992-RIPE
--- ifmail v.2.15dev5
* Origin: Adamant ISP news server (2:5020/400)
Вернуться к списку тем, сортированных по: возрастание даты уменьшение даты тема автор
|
