Re: [PERL] problem ved indlæsning af filnavne fra dir med readdir

[Christian Borup <sslug@sslug>]

Christian Hansen wrote:

> Jeg har brug for at indlæse samtlige filnavne fra et dir, helt bestemt
> /etc/skel
>
> På en RedHat 7 har man bare være så usmart at lave filnavne med
> mellemrum i, altså "et filnavn.ext".
>
> Hvis vi nu siger, at jeg har tre filnavne i mit dir, nemlig
> "filnavn1.ext", "filnavn2.ext" og "fil navn3.ext"
>
> Jeg læser ind i et array med
>
> opendir(SKEL, "/etc/skel");
> @entries = readdir(SKEL);
> closedir(SKEL);
>
> nu skulle arrayet @entries gerne have 3 indgange, nemlig ovenstående
> filnavne, men i stedet har det 4, nemlig "filnavn1.ext", "filnavn2.ext",
> "fil" og "navn3.ext".

Jeg ville faktisk forvente 5 indgange: ".", "..", "filnavn1.ext",
"filnavn2.ext" og "fil navn3.ext".
Hvilket ville resultere i $#entries == 4, du har vel ikke bare skrevet
$#entries ud i stedet for at dumpe array'et selv?

> Er der nogen, der kender en løsning på dette irriterende problem?

Nej, readdir virker fint på min maskine her... Også på filer med mellemrum.

./borup