• Publicidad

Extraer nombre de dominio de dirección de correo

¿Apenas comienzas con Perl? En este foro podrás encontrar y hacer preguntas básicas de Perl con respuestas aptas a tu nivel.

Extraer nombre de dominio de dirección de correo

Notapor jimr1984 » 2017-09-20 11:50 @535

Saludos, comunidad.

Por favor, si pueden darme una ayuda.

Necesito una expresión regular que extraiga el dominio de una cuenta de correo.

Ejemplo, si tengo las siguientes cuentas

@vec = ( '[email protected]', '[email protected]', '[email protected]', '[email protected]' );

que me extraiga el dominio. El resultado debería ser:

midominio.com
otro.com
gmail.com.py
ultra.es

Por favor, si pueden ayudarme. Estoy intentando con esta expresión:

if ($var[1] =~ m/@(.+)/g) { }
jimr1984
Perlero nuevo
Perlero nuevo
 
Mensajes: 123
Registrado: 2012-11-25 07:11 @341

Publicidad

Re: Extraer nombre de dominio de dirección de correo

Notapor explorer » 2017-09-20 12:42 @571

La expresión regular es correcta. Te sobra el '/g'.

Sintáxis: [ Descargar ] [ Ocultar ]
Using perl Syntax Highlighting
  1. #!/usr/bin/env perl
  2. use v5.14;
  3.  
  4.  
  5. for (@vec) {
  6.  
  7.     if (/@(.+)/) {
  8.         say $1;
  9.     }
  10. }
  11.  
Coloreado en 0.005 segundos, usando GeSHi 1.0.8.4
JF^D Perl programming & Raku programming. Grupo en Telegram: https://t.me/Perl_ES
Avatar de Usuario
explorer
Administrador
Administrador
 
Mensajes: 14480
Registrado: 2005-07-24 18:12 @800
Ubicación: Valladolid, España


Volver a Básico

¿Quién está conectado?

Usuarios navegando por este Foro: No hay usuarios registrados visitando el Foro y 5 invitados