🚀 go-pugleaf

RetroBBS NetNews Server

Inspired by RockSolid Light RIP Retro Guy

Article View: es.comp.os.linux.programacion
Article #18858

Re: Duda con perl

#18858
From: Manuel Moreno
Date: Fri, 02 Jul 1999 00:00
33 lines
1409 bytes
El Thu, 01 Jul 1999 19:55:22 +0000, Han Solo escrivio estos
 fermosos latines:

>No consigo que funcione una tonter�a en perl. Estoy probando lo
>siguiente:
>
>#!/usr/bin/perl
>$text="jjj   kkk";
>$numesp = $text =~ tr/\s\s/\s\s/;
>print $numesp;

>Se trada de que cuente el n�mero de espacio dobles que hay en una cadena
>dada, 

sustituye
	$numesp = $text =~ tr/\s\s/\s\s/;
por
	$numesp = $text =~ s/  /  /g;

Creo que con "tr//" nunca hubieras podido conseguir lo que querias ya
que "tr" hace su trabajo caracter a caracter, no se si me explico.
Es mas adecuado utilizar "s//g" que tambien devuelve el numero
de ocurrencias.

Un saludo!

-- 
   /\    Quitar ANTIBASURA para contestar por e-mail
  /  \   Remove ANTIBASURA to reply via e-mail
 /____\  Manuel Moreno - Albacete - Spain
 \    /  
  \  /  
   \/  
Technical Details
Message-ID: <slrn7nnpc0.bd.menesesANTIBASURA@B52.net>
Path: arc1-ca.pugleaf.net!unknown!not-for-mail
References: <377BC7AA.73D58657@maptel.es>

Show Full Headers
Complete Article Headers
X-Google-Language: SPANISH,ASCII
X-Google-Thread: f86c8,d57aed6a9460b35a
X-Google-Attributes: gidf86c8,public
From: menesesANTIBASURA@ctv.es (Manuel Moreno)
Subject: Re: Duda con perl
Date: 1999/07/02
Message-ID: <slrn7nnpc0.bd.menesesANTIBASURA@B52.net>
X-Deja-AN: 496786697
Content-Transfer-Encoding: 8bit
References: <377BC7AA.73D58657@maptel.es>
Content-Type: text/plain; charset=iso-8859-1
Organization: B52
Mime-Version: 1.0
User-Agent: slrn/0.9.5.4 (UNIX)
Reply-To: menesesANTIBASURA@ctv.es
Newsgroups: es.comp.os.linux.programacion