El operador y en Perl traduce todos los caracteres de SearchList a los caracteres correspondientes de ReplacementList.
Aquí, la lista de búsqueda son los caracteres de entrada dados que se convertirán en los caracteres correspondientes dados en la lista de reemplazo.
Sintaxis: y/ListaBúsqueda/ListaReemplazo/
Devuelve: la string traducida
Ejemplo 1: Este ejemplo usa el operador y para traducir de minúsculas a mayúsculas.
#!/usr/bin/perl # Initialising some strings $string1 = 'gfg is a computer science portal'; $string2 = 'geeksforgeeks'; # Calling to y function $string1 =~ y/a-z/A-Z/; $string2 =~ y/a-z/A-Z/; # Getting translated strings print "$string1\n"; print "$string2\n";
Producción:
GFG IS A COMPUTER SCIENCE PORTAL GEEKSFORGEEKS
Ejemplo 2: Este ejemplo usa el operador y para traducir de mayúsculas a minúsculas.
#!/usr/bin/perl # Initialising some strings $string1 = 'GFG IS A COMPUTER SCIENCE PORTAL'; $string2 = 'GEEKSFORGEEKS'; # Calling to y function $string1 =~ y/A-Z/a-z/; $string2 =~ y/A-Z/a-z/; # Getting translated strings print "$string1\n"; print "$string2\n";
Producción :
gfg is a computer science portal geeksforgeeks
Nota: Este operador y realiza la tarea de la función lc() y la función uc() , además de traducir los caracteres de entrada a forma numérica, etc.
Ejemplo 3: Este ejemplo usa el operador y para traducir de mayúsculas a forma numérica.
#!/usr/bin/perl # Initialising some strings $string1 = 'GFG IS A COMPUTER SCIENCE PORTAL'; $string2 = 'GEEKSFORGEEKS'; # Calling to y function $string1 =~ y/A-Z/0-9/; $string2 =~ y/A-Z/0-9/; # Getting translated strings print "$string1\n"; print "$string2\n";
Producción :
656 89 0 29999949 9284924 999909 6449959964499
Publicación traducida automáticamente
Artículo escrito por Kanchan_Ray y traducido por Barcelona Geeks. The original can be accessed here. Licence: CCBY-SA