文档标签问题

sunsansheng_cu

文档1.txt内容:

select * from dwetlv
;
+--------------------------------------------------------------+
insert into ;
select * from xxxxx;
insert into
;
select * from dwetlv
where a='1';

INSERT into ...
select a from xxxx
insert into select *
select *

insert *
where b='123';

select * from xxxxx
;insert into
;




文档2.txt内容:
select
insert
create
del
update

我的目的是 2.txt为关键字标示 从1.txt中找到关键字,并在关键字前面+上[A],在关键字后第一个分号后+[/A],在第一个关键字出现到分号结束中间的其他关键字忽略不加标记

操作系统:HP-UNIX 不要用sed


结果需求1.txt修改:
[A]
select * from dwetlv
;
[/A]

+--------------------------------------------------------------+
[A]
insert into ;
[/A]
[A]
select * from xxxxx;
[/A]
[A]
insert into
;
[/A]
[A]
select * from dwetlv
where a='1';
[/A]

[A]
INSERT into ...
select a from xxxx
insert into select *
select *

insert *
where b='123';
[/A]

[A]
select * from xxxxx
;
[/A]
[A]
insert

into
;
[/A]

liion631818

1. 
   
2. awk 'BEGIN{
   
3.         word1="'[A]'"
   
4.         word2="'[/A]'"
   
5.         end="'\;'"
   
6.         flag=0
   
7.         while(getline<"'2.txt'"){
   
8.                 keyword[$0]
   
9.         }
   
10. }
    
11. function matchkey(var){
    
12.         for(key in keyword){
    
13.                 if(index(tolower(var), tolower(key))){
    
14.                         flag++
    
15.                         return 0
    
16.                 }
    
17.         }
    
18.         return -1
    
19. }
    
20. {
    
21.         if(!matchkey($0)&&flag==1){
    
22.                 print word1
    
23.         }
    
24.         print $0
    
25.         if(index($0, end)){
    
26.                 flag=0
    
27.                 print word2
    
28.         }
    
29. }'
    

复制代码

sunsansheng_cu

liion631818 发表于 2011-06-16 11:35

输出结果:在最后一种情况时 会出现问题.
[A]
select * from dwetlv
;
[/A]
+--------------------------------------------------------------+
[A]
insert into ;
[/A]
[A]
select * from xxxxx;
[/A]
[A]
insert into
;
[/A]
[A]
select * from dwetlv
where a='1';
[/A]

[A]
INSERT into ...
select a from xxxx
insert into select *
select *

insert *
where b='123';
[/A]

[A]
select * from xxxxx
;insert into
[/A]
;
[/A]

yinyuemi

回复 1# sunsansheng_cu

1. $ awk '/.*;../{sub(";",";\n")}1' raw.txt |awk 'BEGIN{IGNORECASE=1}NR==FNR{a[$1]=1;next}a[$1]&&!p{$0="[A]\n"$0;p=2}p==2&&/;/{sub(";",";\n[/A]");p=0}1' keyword.txt -

复制代码

liion631818

回复 3# sunsansheng_cu


    借楼上SS大牛的代码，先在分号后面加换行awk '/.*;../{sub(";",";\n")}1' raw.txt | 。。。

liion631818

回复  liion631818


    这么大段啊，看着就头疼。呵呵。
zooyo 发表于 2011-06-16 11:51

   
    awk用的不熟哦，只能用这种直白的代码咯，SS大牛的代码看了半天才明白

sunsansheng_cu

同样不懂.. 想问~~~

sunsansheng_cu

回复  sunsansheng_cu
yinyuemi 发表于 2011-06-16 11:58

大牛的代码 貌似也没解决,这个问题,最后一个举例的:
原文:
select * from xxxxx
;insert into
;
修改后的:
[A]
select * from xxxxx
;
[/A]insert into
;

yinyuemi

回复 9# sunsansheng_cu

你是说：
如果原文是

1. 
   
2. select * from xxxxx
   
3. ;insert into
   
4. ;
   

复制代码

的话，修改后应该是

1. 
   
2. [A]
   
3. select * from xxxxx
   
4. ;
   
5. [/A]insert into
   
6. ;
   

复制代码

么？