@echo off&setlocal enabledelayedexpansion
for /f "delims=" %%a in (1.txt) do (
   set /a n=0
   for %%b in (%%a) do set /a "n+=1<<%%b"
   if not defined _!n! echo %%a
   set _!n!=_
)
pause
复制代码

@echo off&setlocal enabledelayedexpansion
for /f "tokens=1-3" %%a in (1.txt) do (
	set /a a=%%a,b=%%b,c=%%c
	for %%d in (c-b b-a c-b) do (
		for /f "tokens=1,2 delims=-" %%e in ("%%d") do (
			if !%%e! gtr !%%f! set /a %%e=!%%f!,%%f=!%%e!
		)
	)
	if not defined _!a!_!b!_!c! (
		echo %%a %%b %%c
		set _!a!_!b!_!c!=_
	)
)
pause
复制代码

@echo off&setlocal enabledelayedexpansion
set str=a b c
::abc 分别代表三个变量名，表示只有三列

for %%a in (!str!) do (
	for /f %%b in ("!str:*%%a=!") do (
		if defined list set "list=!list!%%a "
		set "list=%%a !list!"
		set list=!list:%%a =%%b-%%a !
	)
)
::获取用于 if 判断的顺序表

for /f "delims=" %%a in (1.txt) do (
	set tmp=%%a
	for %%b in (%str%) do (
		for /f %%c in ("!tmp!") do set %%b=%%c
		set tmp=!tmp:~2!
	)
	rem 设置每列的值到对应变量

	for %%d in (%list%) do (
		for /f "tokens=1,2 delims=-" %%b in ("%%d") do (
			if !%%b! gtr !%%c! set /a %%b=!%%c!,%%c=!%%b!
		)
	)
	if not defined _!a!_!b!_!c! (
		echo %%a
		set _!a!_!b!_!c!=_
	)
)
pause
复制代码

@echo off 
setlocal enabledelayedexpansion
for /f "tokens=1-3" %%a in (1.txt) do (
set /a num=%%a+%%b+%%c
for /f "tokens=1-4" %%i in ("!num! %%a %%b %%c") do (
set /a _%%i+=1
if "!_%%i!"=="1" echo %%j %%k %%l
)
)
pause
复制代码

#!/usr/bin/perl
use warnings;
use strict;

my %count;
while (<DATA>) {
my @number=split;
chomp (my $sorted_number=join "",sort { $a <=> $b } @number);
$count{$sorted_number}++;
print "$_" if $count{$sorted_number}==1;
}
__END__
1 1 1
1 1 2
1 2 1
2 3 0
2 1 1
0 2 3
5 4 6
4 5 6
7 8 9
8 7 9
1 1 1
复制代码

@echo off 
if exist temp1.txt (del /a /f temp1.txt)
if exist temp2.txt (del /a /f temp2.txt)
for /f "tokens=1-3" %%i in (1.txt) do (
    (echo %%i&echo %%j&echo %%k)|sort
)>>temp1.txt
for /f "tokens=1,2 delims=:" %%i in ('findstr /n .* temp1.txt') do (
    setlocal enabledelayedexpansion
    set /a a=%%i%%3
    if !a! equ 1 (echo.&&set /p=%%j<nul) else (set /p=%%j<nul)
)>>temp2.txt
del /a /f temp1.txt
pause
复制代码

@Echo Off&SetLocal EnableDelayedExpansion
(For /F "delims=" %%i In (a.txt) Do (
  Set "Str="
  For /F %%j In ('^(For %%j In ^(%%i^) Do Echo %%j^)^|Sort') Do Set "Str=!Str! %%j"
  If Not Defined _!Str:~1! Echo %%i&Set "_!Str:~1!=a"
))>b.txt
Start b.txt
复制代码

gawk "!a[$1^5+$2^5+$3^5]++" a.txt
复制代码

gawk "!a[10^$1+10^$2+10^$3]++" a.txt
复制代码

gawk "BEGIN {p[0]=2;p[1]=3;p[2]=5;p[3]=7;p[4]=11;p[5]=13;p[6]=17;p[7]=19;p[8]=23;p[9]=29;}!a[p[$1]*p[$2]*p[$3]]++" a.txt
复制代码