---

Hej alle sammen og undskyld hvis jeg er o.t.

Men jeg bruger et freeware program på mit website som hedder Links og en af
de ting som Links kan gøre, er at chekke om der er 2 eller flere af samme
ens link i databasen. Nu er det bare sådan at man kan bygge sine links op i
forskellige kategorier og derfor kan det jo godt forkomme at linket skal
være der 2 eller flere gange, sålænge at det ikke er indenfor samme
kategori.

Jeg har snuset mig frem til den programstump, som jeg tror laver sorteringen
og hvis den er i Perl, må det da kunne lade sig gøre at lave den om, så den
ikke vider dublikat links frem, uden at de er i samme kategori.

Her er prg. stumpen.

open (DB, "<$db_links_name") or &cgierr("error in check_duplicates. unable
to open db file: $db_links_name. Reason: $!");
LINE: while (<DB>) {
(/^#/) and next LINE;
(/^\s*$/) and next LINE;
chomp;
@values = &split_decode($_);
$values[$db_url] =~ s,/$,,;
$seen{$values[$db_url]}++;
push (@{$doubles{$values[$db_url]}}, $values[$db_key_pos],
$values[$db_title], $values[$db_category]);
}
close DB;
while (($url, $count) = each %seen) {
($count < 2) and delete $doubles{$url};
}
&html_check_duplicates (%doubles);
}

Forklar venligst med store bogstaver, da jeg er helt newbee indenfor
området.

--
Med venlig hilsen

Kim Larsen

*** KONKURRENCE ***
Ligenu har du mulighed for at vinde entrebilletter til Ferie for alle 2002 i
Messecenter Herning.
Kik forbi www.Rejsebeskrivelser.dk og deltag i konkurrencen.


---
Outgoing mail is certified Virus Free.
Checked by AVG anti-virus system (http://www.grisoft.com).
Version: 6.0.314 / Virus Database: 175 - Release Date: 11-01-02

---

"Rejsebeskrivelser.dk" <Webmaster@[remove]Rejsebeskrivelser.dk> writes:

> Jeg har snuset mig frem til den programstump, som jeg tror laver sorteringen
> og hvis den er i Perl, må det da kunne lade sig gøre at lave den om, så den
> ikke vider dublikat links frem, uden at de er i samme kategori.

Det er rigtig nok perl. Jeg tror ikke rigtigt at der er nogen simpel
tilføj en linje her-løsning på dit problem. Jeg tror jeg ville skrive
det meste af kodestumpen om

DU SKAL HAVE NØGLERNE I DIN %seen TIL AT INDEHOLDE KATEGORIERNE, SÅ
%seen TÆLLER URLER FORDELT PÅ BÅDE URL OG KATEGORI. I DIN while (... =
each %seen)-LØKKE SKAL DU SÅ HIVE URL'EN OG KATEGORIEN UD AF NØGLEN
INDEN DU BEGYNDER AT SLETTE FRA %doubles. OG SELVE DET AT SLETTE I
%doubles BLIVER NOGET AF EN STØRRE OMGANG.

(hvad hjælper de store bogstaver egentligt?)

Det er en større opgave og ikke særlig konstruktiv til et
usenet-indlæg. Iøvrigt har jeg på fornemmelsen at det er en
skod-programmør der har skrevet koden i første omgang, hvilket gør det
endnu sværre. ($db_url, $db_key_pos osv er konstanter ikke?)

--
Når folk spørger mig, om jeg er nørd, bliver jeg altid ilde til mode
og svarer lidt undskyldende: "Nej, jeg bruger RedHat".
-- Allan Olesen på dk.edb.system.unix

---

Peter Makholm told the rest of dk.edb.programmering.perl:

[...]

> (hvad hjælper de store bogstaver egentligt?)

Tænk det slog også lige mig - hvorfor begynder du nu på sådan noget
pjat Peter?

--
H e n r i k B o e g h ^ http://henrik.boegh.net/index.php?side=usenet
*** There's an X_ to much in my email address ***
"It is not justice we search - it's vengigence"
- Vincent Schiavelli as Uncle Enyos in 'Buffy the Vampire Slayer'

---

Tak for hjælpen !

OK
Versalerne var ment billedligt talt ! - Som når man prøver at skærer noget
ud i pap for et barn.
Men det var da let at læse.

En skam dog, at det ikke lige var sådan at ændre på skriptet !



--
Med venlig hilsen

Kim Larsen

*** KONKURRENCE ***
Ligenu har du mulighed for at vinde entrebilletter til Ferie for alle 2002 i
Messecenter Herning.
Kik forbi www.Rejsebeskrivelser.dk og deltag i konkurrencen.
"Peter Makholm" <peter@makholm.net> skrev i en meddelelse
news:87wuya985a.fsf@xyzzy.adsl.dk...
> "Rejsebeskrivelser.dk" <Webmaster@[remove]Rejsebeskrivelser.dk> writes:
>
> > Jeg har snuset mig frem til den programstump, som jeg tror laver
sorteringen
> > og hvis den er i Perl, må det da kunne lade sig gøre at lave den om, så
den
> > ikke vider dublikat links frem, uden at de er i samme kategori.
>
> Det er rigtig nok perl. Jeg tror ikke rigtigt at der er nogen simpel
> tilføj en linje her-løsning på dit problem. Jeg tror jeg ville skrive
> det meste af kodestumpen om
>
> DU SKAL HAVE NØGLERNE I DIN %seen TIL AT INDEHOLDE KATEGORIERNE, SÅ
> %seen TÆLLER URLER FORDELT PÅ BÅDE URL OG KATEGORI. I DIN while (... =
> each %seen)-LØKKE SKAL DU SÅ HIVE URL'EN OG KATEGORIEN UD AF NØGLEN
> INDEN DU BEGYNDER AT SLETTE FRA %doubles. OG SELVE DET AT SLETTE I
> %doubles BLIVER NOGET AF EN STØRRE OMGANG.
>
> (hvad hjælper de store bogstaver egentligt?)
>
> Det er en større opgave og ikke særlig konstruktiv til et
> usenet-indlæg. Iøvrigt har jeg på fornemmelsen at det er en
> skod-programmør der har skrevet koden i første omgang, hvilket gør det
> endnu sværre. ($db_url, $db_key_pos osv er konstanter ikke?)
>
> --
> Når folk spørger mig, om jeg er nørd, bliver jeg altid ilde til mode
> og svarer lidt undskyldende: "Nej, jeg bruger RedHat".
> -- Allan Olesen på dk.edb.system.unix


---
Outgoing mail is certified Virus Free.
Checked by AVG anti-virus system (http://www.grisoft.com).
Version: 6.0.314 / Virus Database: 175 - Release Date: 11-01-02

---

"Henrik Boegh, Denmark" <henrik@boegh.X_net> writes:

> Tænk det slog også lige mig - hvorfor begynder du nu på sådan noget
> pjat Peter?

Det blev der bedt om.

--
Når folk spørger mig, om jeg er nørd, bliver jeg altid ilde til mode
og svarer lidt undskyldende: "Nej, jeg bruger RedHat".
-- Allan Olesen på dk.edb.system.unix

---

In article <87y9iqjpjb.fsf@xyzzy.adsl.dk>, Peter Makholm
<peter@makholm.net> wrote:

>Det blev der bedt om.

Be careful what you ask for - you might get it osv.

-Lasse