---
title: "Räkna bokstäver"
type: "forum-thread"
url: "https://www.webforum.nu/amne/programmering/18969-räkna-bokstäver"
topic: "Programmering"
topic_url: "https://www.webforum.nu/amne/programmering"
author: "Csson"
published: "2000-02-21T21:06:00.000Z"
updated: "2000-03-06T17:40:00.000Z"
replies: 2
views: 481
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/18969-räkna-bokstäver"
---

# Räkna bokstäver

## #1 — Csson, 2000-02-21T21:06Z

Hur räknar man antal bokstäver i en variabel på ett bra sätt?

Anledningen är att jag vill censurera ord i en gästbok, och ersätta de censurerade orden med lika många \* som det finns i ordet.

/Csson

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

## #2 — Robban, 2000-03-06T00:18Z

Var ju ett tag sedan du ställde denna fråga (såg först nu att du inte fått något svar). Möjligt att du redan löst problemet?

Annars kanske följande kodsnutt kan ge inspiration?

\<BLOCKQUOTE\>\<font size="1" face="Verdana, Arial, Helvetica, sans-serif"\>Perl-kod:\<pre\>#!/usr/bin/perl -wT

use strict;

my @fula_ord = ('prutta', 'Göran Persson');

my $input = 'Bara Göran Persson vet när Mona pruttade senast.';

print "$input\\n";

map { 
my $replace = '\*' x length($\_); # Här är det du söker.
$input =\~ s/$\_/$replace/gi;
} @fula_ord;

print "$input\\n";

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

## #3 — Csson, 2000-03-06T17:40Z

Tackar :)

/Csson

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

---

Tråden på webben: https://www.webforum.nu/amne/programmering/18969-räkna-bokstäver