xczxczxcz

回复 15# Gin_Q


    不是熟不熟的问题， 纯PS 体质上 就比 PY 快些，都是脚本语言，PY 就是少打点字，少些括号，被国内媒体炒做太夸张。不如多点时间去学习 汇编/C系列/JAVA/Delphi等。

Gin_Q

回复 16# xczxczxcz


    或许吧！！！我喜欢Python，就像喜欢C一样！

Rasm

回复 8# xczxczxcz


    你好，我文本的原始数据，各用户的行数是一致的

Rasm

回复 7# went


    如果我有20行用户名呢，用你这个就不行了吧

Rasm

回复 6# flashercs


    如果所有的用户用户名有30行，该怎么写

Rasm

回复 5# xczxczxcz


    你的思路是对的，他们写的，没有考虑到我如果同一个用户名有30行，就无法实现

Rasm

原始文本 1.txt

1005495524----a111111
1005495524----abc123
1005495524----aini1314
1005495524----iloveyou
1005495524----q1w2e3r4
1005495524----qq123123
1044122462aa----a111111
1044122462aa----abc123
1044122462aa----aini1314
1044122462aa----iloveyou
1044122462aa----q1w2e3r4
1044122462aa----qq123123
1095591332aa----a111111
1095591332aa----abc123
1095591332aa----aini1314
1095591332aa----iloveyou
1095591332aa----q1w2e3r4
1095591332aa----qq123123
1111qqqq1111----a111111
1111qqqq1111----abc123
1111qqqq1111----aini1314
1111qqqq1111----iloveyou
1111qqqq1111----q1w2e3r4
1111qqqq1111----qq123123
111qqq111----a111111
111qqq111----abc123
111qqq111----aini1314
111qqq111----iloveyou
111qqq111----q1w2e3r4
111qqq111----qq123123
复制代码

处理后的文本2.txt

1005495524----aini1314
1005495524----a111111
1005495524----abc123
1044122462aa----aini1314
1044122462aa----a111111
1044122462aa----abc123
1095591332aa----aini1314
1095591332aa----a111111
1095591332aa----abc123
1111qqqq1111----aini1314
1111qqqq1111----a111111
1111qqqq1111----abc123
111qqq111----aini1314
111qqq111----a111111
111qqq111----abc123
1005495524----q1w2e3r4
1005495524----iloveyou
1005495524----qq123123
1044122462aa----q1w2e3r4
1044122462aa----iloveyou
1044122462aa----qq123123
1095591332aa----q1w2e3r4
1095591332aa----iloveyou
1095591332aa----qq123123
1111qqqq1111----q1w2e3r4
1111qqqq1111----iloveyou
1111qqqq1111----qq123123
111qqq111----q1w2e3r4
111qqq111----iloveyou
111qqq111----qq123123
复制代码

想将相同的内容用户名，以每3行为基础进行分割，排列，实现2.txt的效果

附上原始文本，80万条，不知道批处理可否实现

链接：https://share.weiyun.com/KY7VFOde 密码：i4aayw

cfwyy77_bat

纯P, 估计累的够呛，这种文本需求，建议还是用其它语言来处理，如PS,python,perl,awk.
我个人现在还是更喜欢awk来处理文本。
简单起见，假定你的源文件，都是这样规则的，用户都已经分组好了，用户条数都是一致的。

test.awk

function ceil(a,b)
{
    t=int(a/b)
    return a==t*b?t:t+1
}
BEGIN	{
    usrLines=44
    n=3
}
{
    a[int((NR-1)/usrLines)][(NR-1)%usrLines]=$0
}
END	{
    for(k=0;k<ceil(usrLines,n);k++)
        for(i=0;i<length(a);i++)
            for(j=0+n*k;j<n+n*k && j<usrLines;j++)
                print a[i][j]
}
复制代码

 awk -f test.awk 3.txt >2.txt
复制代码

几十万条结果还是秒出的。

Rasm

回复 23# cfwyy77_bat


为什么处理以后，有些是 4行，有些6行

附上原始文本，80万条

链接：https://share.weiyun.com/KY7VFOde 密码：i4aayw

WHY

$d = get-Date;
$arr = [IO.File]::ReadAllLines('3.txt', [Text.Encoding]::UTF8) -match '-{4}';
$Len = $arr.Count;
$dic = New-Object 'System.Collections.Generic.Dictionary[string, [Collections.ArrayList]]';
$max = 0;

for($i=0; $i -lt $Len; $i++) {
    $a = $arr[$i].Trim() -split('----');
    if( !$dic.ContainsKey($a[0]) ){
        $dic.Add($a[0], @($a[1]));    #用户名加入到字典，密码加入到数组
    } else {
        [void]$dic[$a[0]].Add($a[1]);
    }
}

forEach($key In $dic.Keys) {         #找长度最大的数组
    if($dic[$key].Count -gt $max){ $max = $dic[$key].Count; }
}

$out = for($i=0; $i -lt $max; $i+=3) {
    forEach($key In $dic.Keys) {
        for($j=0; $j -lt 3; $j++) {
            if($dic[$key].Count -gt $i+$j) {
                $key + '----' + $dic[$key][$i+$j];
            } else { break; }
        }
    }
}

[IO.File]::WriteAllLines('22.txt', $out);
((get-Date) - $d).TotalSeconds
pause
复制代码

2.6404314
按 Enter 键继续...:
563024 行，速度不算快，也不算太慢

@echo off
chcp 65001 > nul
gawk -F"-{3,}" "BEGIN{max=0}{if($1!=s){i++;j=1};a[i][j++]=$0;s=$1;if(j>max)max=j}END{for(n=1;n<max;n+=3)for(i in a)for(j=0;j<3;j++)if(a[i][n+j])print a[i][n+j]}" 3.txt > 22.txt
pause
复制代码