La función chop() en Perl se usa para eliminar el último carácter de la string de entrada.
Sintaxis: chop(String)
Parámetros:
String : Es la string de entrada cuyos últimos caracteres se eliminan.Devuelve: el último carácter eliminado.
Ejemplo 1:
#!/usr/bin/perl # Initialising a string $string = "GfG is a computer science portal"; # Calling the chop() function $A = chop($string); # Printing the chopped string and # removed character print " Chopped String is : $string\n"; print " Removed character is : $A\n";
Producción:
Chopped String is : GfG is a computer science porta Removed character is : l
Ejemplo 2:
#!/usr/bin/perl # Initialising a string $string = "[1, 2, 3]"; # Calling the chop() function $A = chop($string); # Printing the chopped string and # removed character print " Chopped String is : $string\n"; print " Removed character is : $A\n";
Producción :
Chopped String is : [1, 2, 3 Removed character is : ]
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