awk $1 $2

1cpuer

cat file
an; 12; y
two ; 33; x
year; 22; no

out-file
an       12
two     33
year    22

fh21_xuejinlian

awk -F'[; ]+'  '{print $1,$2}'  file

jason680

回复 1# 1cpuer

$ awk -F' *; *' '{print $1"\t"$2}' file > out-file

$ cat out-file
an    12
two    33
year    22

jcdiy0601

1. awk 'BEGIN{FS=";"}{print $1,$2}' 1|column -t

复制代码

moperyblue

1. awk '{$0=$1 OFS $2}1' FS='\\s*;\\s*'

复制代码

sunzhiguolu

1. #!/usr/bin/perl
   
2. use strict;
   
3. use warnings;
   
4. 
   
5. my @aData = ();
   
6. while (<DATA>){
   
7.     my @aT = @{[split /\s*;\s*/]}[0, 1];
   
8.     push (@aData, \@aT);
   
9. }
   
10. 
    
11. @aData = sort {length ($a->[0]) <=> length ($b->[0])} @aData;
    
12. my $width = length ($aData[-1][0]);
    
13. printf ("%-${width}s\t%s\n", @$_) for @aData;
    
14. 
    
15. __DATA__
    
16. an; 12; y
    
17. two ; 33; x
    
18. year; 22; no

复制代码

perl abc.pl
-------------------------------
an      12
two     33
year    22