我有两个数组.我需要检查并查看其中一个元素是否出现在另一个元素中.
有没有比嵌套循环更有效的方法呢?我每个都有几千个元素,需要经常运行程序.
我需要比较两个数组并得到差异。
背景:
第一个阵列将列出文件夹中的文件。
第二个数组将读取文件的内容并存储在数组中。
第一个数组的输出将是
a
b
c
d
e
Run Code Online (Sandbox Code Playgroud)
第二个数组的输出将是
a
b
c
e
Run Code Online (Sandbox Code Playgroud)
我怎样才能比较得到差异的那两个数组?我想要的结局输出是
d
Run Code Online (Sandbox Code Playgroud)
这是代码:
#!/usr/bin/perl
use strict;
use warnings;
my $list = "experiment.sv";
my $path = "../../../folder1/";
my $filelist;
open ( OUTFILE, ">output.txt" );
main ();
close OUTFILE;
sub main {
my @array1;
opendir ( DIR, $path ) || die "Error in opening dir $path\n";
while ( $filelist = readdir (DIR) ) {
next if ( $filelist =~ s/\.//g); #/
push @array1, $filelist;
}
closedir(DIR);
my …Run Code Online (Sandbox Code Playgroud)