小编Vic*_*cky的帖子

如何查找文件中的重复行?

我有一个包含以下数据的输入文件:

line1
line2
line3
begin
line5
line6
line7
end
line9
line1
line3
Run Code Online (Sandbox Code Playgroud)

我试图找到所有重复的行,我尝试过

sort filename | uniq -c  
Run Code Online (Sandbox Code Playgroud)

但似乎不适合我:

它给了我:

  1 begin
  1 end
  1 line1
  1 line1
  1 line2
  1 line3
  1 line3
  1 line5
  1 line6
  1 line7
  1 line9
Run Code Online (Sandbox Code Playgroud)

这个问题可能看起来重复,因为在文件中查找重复行并计算每行重复了多少次? 但输入数据的性质不同。

请建议。

sorting uniq

6
推荐指数
1
解决办法
7219
查看次数

是否可以有两个不同的Perl版本?

目前我有Perl 5.8.8.我可以更新到Perl 6吗?我正在使用Red Hat Linux 5操作系统.是否可以在Red Hat Linux 5或任何其他操作系统上升级Perl?如果是的话,我该怎么做?

perl perl6

5
推荐指数
2
解决办法
410
查看次数

Perl中这个open()用法中dot的含义是什么?

如何理解open()Perl文件I/O 中该函数的以下用法?

open(FHANDLE, ">" . $file )
Run Code Online (Sandbox Code Playgroud)

我试图在文档中找到这种类型的语法,但没有找到; 请注意有一个.(点)在">"之后.

所有我无法理解的是使用dot,其余我知道.

perl

5
推荐指数
2
解决办法
164
查看次数

在Perl中使用带有while循环的continue块是否有优势?

语法1:

while {
#some code 
}
continue {
#some other code 
}
Run Code Online (Sandbox Code Playgroud)

语法2:

while {
#some code 
#some other code
}
Run Code Online (Sandbox Code Playgroud)

SYNTAX 1是否比SYNTAX 2有任何优势?假设"某些代码"和"其他代码"在两种语法中保持相同的行集.或者它只有两种不同的样式没有编码优势.

perl

5
推荐指数
1
解决办法
72
查看次数

如何在bash shell脚本中读取多行输入到数组中

这是在bash中将多行输入读入数组的正确方法吗?

arr=( $(cat) ); 
echo "{arr[@]}" 
Run Code Online (Sandbox Code Playgroud)

我把这一行放到一个脚本中,我尝试通过在每一行之后按回车键来读取多个输入,但是脚本继续接受输入并且当我按下ctrl C时不会通过到达第二行来打印数组的元素在输入控制台上脚本终止.请建议从命令行读取多行输入的正确方法是否正确?

arrays bash

4
推荐指数
1
解决办法
1496
查看次数

使用 case 语句检查 SQL 表中记录是否存在

当服务表中存在具有 ID 的记录时,下面的查询将返回“Found”,但当服务表中不存在该记录时,以下查询不会返回“Not Found”。我不明白为什么。

select case when  exists (select idaccount from services  where idaccount 
=s.idaccount )
 then 'Found'
 else 'NotFound'  end as GSO  
 from services s 
 where s.idaccount in ( 1421)
Run Code Online (Sandbox Code Playgroud)

sql t-sql database sql-server

4
推荐指数
1
解决办法
7281
查看次数

在正则表达式中使用awk数组

我试图搜索存储在awk数组中的模式"a"从file1读取然后在file2的4rth列中搜索,以下命令工作正常

awk -F" " 'NR==FNR{a[NR]=$1;next}{for (i in a){ if($4 ~ a[i])print $0}}'  file1 file2 
Run Code Online (Sandbox Code Playgroud)

但如果我将命令更改为在if file2的4rth列的开头搜索,如下所示,它不起作用,有什么建议吗?

awk -F" " 'NR==FNR{a[NR]=$1;next}{for (i in a){ if($4 ~ "^a[i]" )print $0}}'  file1 file2 
Run Code Online (Sandbox Code Playgroud)

可以修改第二个命令来搜索file2中4rth列开头的数组元素吗?

awk

3
推荐指数
1
解决办法
223
查看次数

Perl 中的 \0(以反斜杠为前缀的数字)是什么?

我看到一段Perl代码如下:

my $SUCCESS = \0;
my $FAILURE = \1;
Run Code Online (Sandbox Code Playgroud)

这是一个作业,我无法理解 \1 和 \0 的意义。

perl

2
推荐指数
1
解决办法
415
查看次数

列出具有数字名称的文件

如何列出仅具有数字名称的文件,例如

1111 
2342 
763
71
Run Code Online (Sandbox Code Playgroud)

我已经尝试过 ls -l [0-9]* ,但这似乎会带来所有以数字开头的文件名,并且数字后的名称中可以包含任何内容。

unix linux bash shell

2
推荐指数
1
解决办法
2320
查看次数

Python错误:AttributeError:'str'对象没有属性'k'

s="ABC"

for k in ["isalnum()", "isalpha()", "isdigit()", "islower()", "isupper()"]:
    for c in s:
        print(c.k)
Run Code Online (Sandbox Code Playgroud)

获取此错误"AttributeError:'str'对象在执行上述代码时没有属性'k'".我提到了有关此错误的其他类似问题,但无法解决我的问题,我对python很新.

python python-3.x

2
推荐指数
2
解决办法
2007
查看次数

标签 统计

perl ×4

bash ×2

arrays ×1

awk ×1

database ×1

linux ×1

perl6 ×1

python ×1

python-3.x ×1

shell ×1

sorting ×1

sql ×1

sql-server ×1

t-sql ×1

uniq ×1

unix ×1