eqMLinux联盟
#! /usr/bin/awk
eqMLinux联盟
 
eqMLinux联盟

eqMLinux联盟
BEGIN {
eqMLinux联盟
FS="[ ]";
eqMLinux联盟
}
eqMLinux联盟

eqMLinux联盟

eqMLinux联盟

eqMLinux联盟
{
eqMLinux联盟
  arr[len++]=$0;
eqMLinux联盟
}
eqMLinux联盟

eqMLinux联盟

eqMLinux联盟

eqMLinux联盟
END{
eqMLinux联盟
    qsort(arr,0,len);
eqMLinux联盟
    printfile(arr,len+1);
eqMLinux联盟
    exit 0;
eqMLinux联盟
}
eqMLinux联盟

eqMLinux联盟

eqMLinux联盟

eqMLinux联盟

eqMLinux联盟
function qsort(array , p , r , t , i ,x)
eqMLinux联盟
{
eqMLinux联盟

eqMLinux联盟
    if (p < r) {
eqMLinux联盟
        x=array[p];
eqMLinux联盟
        i = p;
eqMLinux联盟
        j = r+1;
eqMLinux联盟
        while(array[--j] > x );
eqMLinux联盟
        while(i < j) {
eqMLinux联盟

eqMLinux联盟
            t = array;
eqMLinux联盟
            array=array[j];
eqMLinux联盟
            array[j]=t;
eqMLinux联盟

eqMLinux联盟
            while(array[++i] < x );
eqMLinux联盟
            while(array[--j] > x );
eqMLinux联盟

eqMLinux联盟
        }
eqMLinux联盟
        qsort(array, p , j);
eqMLinux联盟
        qsort(array, j + 1 , r);
eqMLinux联盟
    }
eqMLinux联盟

eqMLinux联盟
}
eqMLinux联盟

eqMLinux联盟

eqMLinux联盟
function printfile(array,len,k)
eqMLinux联盟
{
eqMLinux联盟
     for(k=1;k<len;k++)
eqMLinux联盟
       {
eqMLinux联盟
         print array[k];
eqMLinux联盟
       }
eqMLinux联盟
}

awk -f qsort datafile