请问 如何 反转指定行 ?

黑色阳光_cu

修正点小bug

sed -n '/NSValue/{h;:l n;//{G;h;$!bl};x;p;x;//q};p' sample.txt

黑色阳光_cu

修正点小bug

sed -n '/NSValue/{h;:l n;//{G;h;$!bl};x;p;x;//q};p' sample.txt
黑色阳光_cu 发表于 2010-08-08 17:52

等价的Perl写法：

1. 
   
2. #!/bin/env perl
   
3. 
   
4. use strict;
   
5. use warnings;
   
6. 
   
7. my @stack;
   
8. while (my $line = <DATA>)
   
9. {
   
10.         if (index($line, "NSValue") != -1 ... index($line, "NSValue") == -1)
    
11.         {
    
12.                 if (index($line, "NSValue") != -1)
    
13.                 {
    
14.                         unshift(@stack, $line);
    
15.                 }
    
16.                 else
    
17.                 {
    
18.                         foreach my $line (@stack)
    
19.                         {
    
20.                                 print $line;
    
21.                         }
    
22. 
    
23.                         @stack = ();
    
24.                         print $line;
    
25.                 }
    
26.         }
    
27.         else
    
28.         {
    
29.                 print $line;
    
30.         }
    
31. }
    
32. 
    
33. foreach my $line (@stack)
    
34. {
    
35.         print $line;
    
36. }
    
37. 
    
38. __DATA__
    
39. NSArray  *red = [NSArray arrayWithObjects:
    
40.              [NSValue valueWithCGPoint: ccp(0, 94.0)],
    
41.              [NSValue valueWithCGPoint: ccp(0, 44.0)],
    
42.              [NSValue valueWithCGPoint: ccp(0, 40.0)],
    
43.              [NSValue valueWithCGPoint: ccp(0, 15.0)],
    
44.              nil];   
    
45. 
    

复制代码

or

1. 
   
2. #!/bin/env perl
   
3. 
   
4. use strict;
   
5. use warnings;
   
6. 
   
7. my @stack;
   
8. while (my $line = <DATA>)
   
9. {
   
10.         if (index($line, "NSValue") != -1)
    
11.         {
    
12.                 unshift(@stack, $line);
    
13.         }
    
14.         else
    
15.         {
    
16.                 if ($#stack > -1)
    
17.                 {
    
18.                         foreach my $line (@stack)
    
19.                         {
    
20.                                 print $line;
    
21.                         }
    
22.                        
    
23.                         @stack = ();
    
24.                 }
    
25.        
    
26.                 print $line;
    
27.         }
    
28. }
    
29. 
    
30. foreach my $line (@stack)
    
31. {
    
32.         print $line;
    
33. }
    
34. 
    
35. __DATA__
    
36. NSArray  *red = [NSArray arrayWithObjects:
    
37.              [NSValue valueWithCGPoint: ccp(0, 94.0)],
    
38.              [NSValue valueWithCGPoint: ccp(0, 44.0)],
    
39.              [NSValue valueWithCGPoint: ccp(0, 40.0)],
    
40.              [NSValue valueWithCGPoint: ccp(0, 15.0)],
    
41.              nil];   
    
42. 
    

复制代码

黑色阳光_cu

shell~~~

1. 
   
2. #!/bin/bash
   
3. 
   
4. declare -a stack
   
5. IFS=""
   
6. 
   
7. while read -r line
   
8. do
   
9.         if [[ $line =~ "NSValue" ]]
   
10.         then
    
11.                 stack[${#stack[@]}]=$line
    
12.         else
    
13.                 if [[ ${#stack[@]} > 0 ]]
    
14.                 then
    
15.                         for ((n = ${#stack[@]} - 1; n >= 0; n--))
    
16.                         do
    
17.                                 echo ${stack[$n]}
    
18.                         done
    
19.                         unset stack
    
20.                 fi
    
21. 
    
22.                 echo $line
    
23.         fi
    
24. done <$1
    
25. 
    
26. for ((n = ${#stack[@]} - 1; n >= 0; n--))
    
27. do
    
28.         echo ${stack[$n]}
    
29. done
    

复制代码

syshack

回复 13# 黑色阳光_cu

哈哈 是你啊？

nxlinux

1. 
   
2. awk '/NSArray/{n=1;h=NR;print;next}/;/{m=$0;e=NR;next}{a[NR]=$0}END{for(i=e-1;i>h;i--){print a[i]}print m}' test
   
3. 
   

复制代码

kofgirl

shell~~~
黑色阳光_cu 发表于 2010-08-08 18:57

强人啊。　学习中。

kofgirl

nxlinux 发表于 2010-08-08 19:16

哈哈，　awk 也出来　了。　学习。。。。