---
title: "Lägg till nummer."
type: "forum-thread"
url: "https://www.webforum.nu/amne/programmering/19291-lägg-till-nummer"
topic: "Programmering"
topic_url: "https://www.webforum.nu/amne/programmering"
author: "Kent"
published: "2001-02-21T22:53:00.000Z"
updated: "2001-02-22T17:19:00.000Z"
replies: 4
views: 208
page: 1
pages: 1
language: "sv-SE"
site: "webForum — webforum.nu"
rights: "Upphovsrätten till varje inlägg tillhör dess författare."
attribution: "Citera som: webForum, https://www.webforum.nu/amne/programmering/19291-lägg-till-nummer"
---

# Lägg till nummer.

## #1 — Kent, 2001-02-21T22:53Z

Fick en kod av dig FlashX för ett tag sedan som räknar filer i en katalog och skapar en ny, den funkar kanon, men vill jag lägga till id't även i textfilen som skapas så går det inte,
så här ser det ut,

$txtDir = "filer";
$number = 0;
if (-d "$txtDir") {
opendir(TEXTFILER, "$txtDir") or die "Kan inte öppna filen\\n";
@txtfiler = grep { /\\.txt$/i } readdir TEXTFILER;
closedir(TEXTFILER);
$number = @txtfiler;
chmod (0777, "$number.txt");
}

open(FILE, "\>filen/$number\\.txt") or die "Kan inte öppna filen\\n";
print FILE "$number::$FORM{'namn'}\\n";
close(FILE);

vad kan det bero på.?

Permalänk: https://www.webforum.nu/p/19291

## #2 — FlashX, 2001-02-21T23:15Z

chmod (0777, "$number.txt"); var tänkt att ligga under close(FILE); eftersom det var nya filer som skapades varje gång.
Fast det kanske inte ens behövs i ditt fall.

Vad fungerar inte. Skrivs det andra värdet till filen eller skapas filen inte ö.h.t.

Permalänk: https://www.webforum.nu/p/341618

## #3 — Kent, 2001-02-22T00:12Z

Det funkar bra att skapa en ny nummer fil, 1.txt 2.txt osv. men om jag även vill lägga till numret i filen som skapas ex,
1::namn
så läggs inte numret till,
det blir ex,
::namn

Permalänk: https://www.webforum.nu/p/341619

## #4 — FlashX, 2001-02-22T10:57Z

Använd

```
$txtDir = "filer";
$number = 0;
if (-d "$txtDir") {
opendir(TEXTFILER, "$txtDir") or die "Kan inte öppna mappen\n";
@txtfiler = grep { /\.txt$/i } readdir TEXTFILER;
closedir(TEXTFILER);
$number = @txtfiler;
}

open(FILE, ">filen/$number.txt");
print FILE "$number\:\:$FORM{'namn'}\n";
close(FILE);
```

så tror jag det löser sig.

Permalänk: https://www.webforum.nu/p/341620

## #5 — Kent, 2001-02-22T17:19Z

Nu verkar det funka perfekt.!
Tack för hjälpen FlashX.!!

Permalänk: https://www.webforum.nu/p/341621

---

Tråden på webben: https://www.webforum.nu/amne/programmering/19291-lägg-till-nummer