🚀 go-pugleaf

RetroBBS NetNews Server

Inspired by RockSolid Light RIP Retro Guy

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

Empezando con perl

#15023
From: Oscar Manuel
Date: Sun, 27 Aug 2000 23:01
46 lines
2809 bytes
Por fin me he cogido un tutorial de perl
(http://www.granavenida.com/perl/tutoperl-print.html) y he practicado
con los primeros ejercicios, pero ahora he topado con dos en los que no
sé qué función o funciones usar, y si han salido (aunque lo he repasado
varias veces), no veo la aplicación de las funciones que han salido al
problema concreto.

No pretendo que nadie me dé el código, sino la clave para poder hacerlo
yo.

El primero es simplemente convertir una cadena a mayúsculas. He
intentado usar ucase("texto") para ver si colaba, pero no "cuela". La
otra opción es analizar carácter a carácter la cadena, ver si el
carácter en cuestión se encuentra en el rango de las minúsculas,
restarle ¿32? al código ascii y sustituir el carácter antiguo por el
nuevo. Vamos, de sólo escribirlo, creo que el tutorial no ha llegado a
este punto, pero a lo mejor soy yo el que no lo ve...

El segundo, si lo he entendido bien, es solicitar por STDIN nombre y
apellidos (supongo que en una única variable, porque si no, no le veo la
dificultad) para luego sacar primero los apellidos y luego el nombre.
Deduzco que debe haber alguna función que pueda analizar carácter a
carácter una cadena, pero no soy capaz de dar con ella.

Son los "ejercicios 1" de la página mencionadaa, por si acaso alguien
quiere echarles un vistazo.

Gracias.

-- 
http://counter.li.org registration info:
----------------------------------------
Linux user: 92390 - Linux machine: 39301

|--------------------------------------------|
|        Oscar Manuel Gómez Senovilla        |
|   mailto:oscarsen@BORRARomgs.findhere.com  |
|       (quita "BORRAR" después de @)        |
|         (remove "BORRAR" after @)          |
|               Madrid (España)              |
|--------------------------------------------|
Technical Details
Message-ID: <39A99DC3.F435E233@omgs.es>
Path: arc1-ca.pugleaf.net!supernews.google.com!sn-xit-02!supernews.com!easynews!newsfeed.frii.net!news-spur1.maxwell.syr.edu!news.maxwell.syr.edu!fu-berlin.de!newsfeed.bcn.ttd.net!news.mad.ttd.net!oscar.omgs.es!not-for-mail

Show Full Headers
Complete Article Headers
X-Google-Language: SPANISH,ASCII
X-Google-Thread: f86c8,a62894166a1dda9a,start
X-Google-Attributes: gidf86c8,public
X-Google-ArrivalTime: 2000-08-27 16:09:07 PST
Path: arc1-ca.pugleaf.net!supernews.google.com!sn-xit-02!supernews.com!easynews!newsfeed.frii.net!news-spur1.maxwell.syr.edu!news.maxwell.syr.edu!fu-berlin.de!newsfeed.bcn.ttd.net!news.mad.ttd.net!oscar.omgs.es!not-for-mail
From: Oscar Manuel <oscar@omgs.es>
Newsgroups: es.comp.os.linux.programacion
Subject: Empezando con perl
Date: Mon, 28 Aug 2000 01:01:23 +0200
Organization: Estoy harto de spammers
Lines: 46
Message-ID: <39A99DC3.F435E233@omgs.es>
NNTP-Posting-Host: 206033.rad.bbv.es
Mime-Version: 1.0
Content-Type: text/plain; charset=iso-8859-1
Content-Transfer-Encoding: quoted-printable
X-Trace: oscar.omgs.es 967417284 8315 192.168.0.10 (27 Aug 2000 23:01:24 GMT)
X-Mailer: Mozilla 4.51 [en] (X11; I; Linux 2.2.16 i586)
X-Accept-Language: es