nav[aria-label="Primary Navigation"] { padding: 0; & ul { list-style: none; width: 100%; display: flex; flex-direction: row; justify-content: start; align-items: start; gap: 30px; padding: 0; & li { margin: 0; } & ul li { list-style: none; } } }

2 D array sort Q

nipper

I have a directory with about 1000 files with a (supposedly) unique EA on each file. Turns out there are a couple dups.

What I did (which was very slow) was read the files into an array (@list) read the EAs into another array (@id) in the
same order as the files.

Then foreach @list, take that ID and look through the list of EAs for 2 or more matches.

Worked, but it was slow.

What were some other options ? If I sorted @id, then it is out of sync with @list and I cannot match up which files have dups.

I was thinking about setting up a hash, but did not know if that would work.

Andy

Find more posts tagged with

Comments

Adam Stoller

Use a hash for the files and/or for the EAs.

For example - if each file has a key "TeamSite/Metadata/myUniqueId" and you want to make sure that each "myUniqueId" is only used once - consider something like this:my %MUIDS;
foreach(@files){
chomp(my $uid = qx($iwhome/bin/iwextattr -g TeamSite/Metadata/myUniqueId));
if (defined($MUIDS{$uid})){
die "'$uid' cannot be used for '$_' as it is already used for '$MUIDS{$_}'"; # ERROR
}
$MUIDS{$uid} = "$_";
}

--fish
Senior Consultant, Quotient Inc.
http://www.quotient-inc.com

Dwayne

Something like:

my %collisionHash = ();



foreach my $file (@fileList) {
    my $targetEA = `iwextattr -g MyTargetEa \"$fileVpath\"`;

    if(defined($collisionHash{$targetEA})) {
        print STDERR "EA collision between $file and $collisionHash{$targetEA}: ea=$targetEA";
        $collisionHash{$targetEA} .= ",$file";
    } else {
        $collisionHash{$targetEA} = $file;
    }
}

would do the job, without worrying about sorting.

--

Current project: TS 5.5.2/6.1 W2K

nipper

Cool thanks, I did not even think about using the error condition on the hash.

Andy