Foro - Perl en Español

Hola a todos, mi duda es ¿qué otra función hace el operador and? Sé lo que hace en una condición, pero por ejemplo en este código:
$a = 'manzanas';
$b = 'peras';
print $a and $b;
¿Por qué imprime manzanas? ¿Qué es lo que hace?

Hola a todos, soy nuevo en esta comunidad y espero poder aprender harto ;)

Ahora va mi duda: me gustaría saber si se puede "conversar" con programas UNIX, me explico: por ejemplo, quiero pasarle algunos parámetros a la función ls, después ejecutarla y tomar acciones dependiendo de la respuesta. ¿Se puede hacer? Si es así, ¿se puede guardar el retorno de ls en alguna variable?

Gracias de ...

Hola a todos.
Miren, tengo un archivo de 200 o más líneas y quiero modificar sólo la número 153 sin usar arrays para el cometido y sin reescribir el archivo por completo.
También sería bueno agregar una línea en un lugar del texto.
¿Como hago esto?
¿Hay algún modulo?
Gracias.

En el tutorial está esta:

$long =~ /\d+/

que sirve para comprobar que contenga al menos algún carácter numérico.

Por otra parte he visto que:

$long =~ /^+$/

Me serviría para comprobar que tenga SÓLO números.

Pero yo quiero que tenga sólo números POSITIVOS, o sea, que me excluya el 0 (sólo, porque si pongo me excluye el 0, pero también cualquier número que lo contenga, como el 100).

¿Qué debo añadir? O ¿cómo ...

Buenas,

Estoy programando un script que se ejecutará en sistemas operativos variados (diferentes sabores de Linux, *BSD, etc...) recién instalados, es decir, tendrán una instalación mínima de Perl.

Este script, entre otras cosas, se conectará a un servidor web vía HTTP para descargar un simple fichero de texto, utilizando autentificación básica (par usuario/contraseña).

Por ahora estoy utilizando el módulo LWP y funciona perfectamente, pero quisiera prescindir de él, ya que en los recién instalados servidores ...

Necesito controlar que una entrada SÓLO contenga los valores 'A', 'T', 'C' o 'G'.

Yo había pensado algo así:

if ($tupla =~ /+/)

pero sólo me "funciona" si sólo contienen letras que no sean 'a', 't', 'c', 'g'. Por ejemplo:

si entro 3 --> error (OK)
si entro AT --> bien (OK)
si entro bx --> error(OK)
si entro abx --> bien (¡¡¡MAAAL!!!)

No sé cómo definir que no hayan "cosas" intercaladas :S

Hola, tengo una duda, cuando una función se ejecuta devuelve verdadero, pero ¿qué devolvería este código?
if ($edad=0) {
print “ Verdadero o falso”;
}
¿y qué es lo que haría?

Hola.

No encuentro, deben ser la torrijas :D , la forma de leer un fichero y separar por posición los campos de cada registro.

Ejemplo de registro:
1234567890nombre apellidos dirección

Quiero obtener:
CAMPO1 : Los primeros 10 caracteres
CAMPO2 : De la posición 11 a la 24
CAMPO3 : De la posición 25 a la 42
CAMPO4 : De la posición 43 a la 60

Un ...

Hola a todos, mi duda es la siguiente.

¿Para que se utiliza esto '<<'?

He intentado averiguarlo con este pequeño código pero no me sale nada.
$mensaje = <<SALUDO;
hola,
adios,
SALUDO
Lo he escrito de diferentes formas, pero nada.

Hola a todos.

Estoy intentando hacer un programita en Perl que me devuelva el árbol de directorios de cualquier ruta que yo le diga, pero no consigo que me lea la variable que yo le debo introducir.

Por favor, que alguien me indique dónde está el fallo porque no sé qué más cambiar.

MIL GRACIAS...

#!/usr/bin/perl
use strict;
use File::Find;
print "introduce la ruta del directorio que quieres listar: ";
$dir = <STDIN>;
chomp ...