|
ru.perl
- RU.PERL ----------------------------------------------------------------------
From : vilfred 2:5020/400 24 Apr 2002 04:44:45
To : Andrey Sapozhnikov
Subject : Re: вот тебе решение твоей задачи...
--------------------------------------------------------------------------------
Доброй ночи!
AS> А он и не работает...
как так не работает?? какой перл? Я под линуксом все это делаю:
1)
[root@mobile100 /root]# ./regex.pl
f<br> g<br><pre>
h
</pre><br>i<br>j<br><xml>u
a v
b
e
</xml><br>r<br>r<br>
========
#!/usr/bin/perl
$u=qq~f
g
<pre>
h
</pre>
i
j
<xml>u
a v
b
e
</xml>
r
r
~;
#$u=~s%((pre|xml).*?/\2)|([\n\cM\cJ]+)%$1?$1:'<br>'%gesi;
$u=~s%((pre|xml).*?/\2)|([\n\cM\cJ]+)%!m&$1&g?$1?$1:'<br>':'<br>'%gesi;
print " $u";
open F, "<regex.pl";
print "\n========\n";
print while(<F>);
print "\n========\n";
========
[root@mobile100 /root]#
2)
File regex.pl not changed so no update needed.
[root@mobile100 /root]# ./regex.pl
f<br> g<br><pre>
h
</pre><br>i<br>j<br><xml>u
a v
b
e
</xml><br>r<br>r<br>
========
#!/usr/bin/perl
$u=qq~f
g
<pre>
h
</pre>
i
j
<xml>u
a v
b
e
</xml>
r
r
~;
$u=~s%((pre|xml).*?/\2)|([\n\cM\cJ]+)%$1?$1:'<br>'%gesi;
#$u=~s%((pre|xml).*?/\2)|([\n\cM\cJ]+)%!m&$1&g?$1?$1:'<br>':'<br>'%gesi;
print " $u";
open F, "<regex.pl";
print "\n========\n";
print while(<F>);
print "\n========\n";
========
[root@mobile100 /root]#
3)
[root@mobile100 /root]# perl -v
This is perl, v5.6.0 built for i386-linux
Copyright 1987-2000, Larry Wall
Perl may be copied only under the terms of either the Artistic License
or the GNU General Public License, which may be found in the Perl 5.0
source kit.
Complete documentation for Perl, including FAQ lists, should be found on
this system using an perl' or .erldoc perl'. If you have access to the
Internet, point your browser at http://www.perl.com/, the Perl Home
Page.
[root@mobile100 /root]# uname -a
Linux mobile100 2.2.19-3.asp #1 Fri Apr 6 14:49:33 MSD 2001 i686 unknown
[root@mobile100 /root]#
--
TEAM [Маньяки]
Отправлено через сервер Форумы@mail.ru - http://talk.mail.ru
--- ifmail v.2.15dev5
* Origin: Talk.ru (2:5020/400)
Вернуться к списку тем, сортированных по: возрастание даты уменьшение даты тема автор
|
