perl | función eliminar()

Delete() en Perl se usa para eliminar las claves especificadas y sus valores asociados de un hash, o los elementos especificados en el caso de una array. Esta operación solo funciona en elementos o sectores individuales.

Sintaxis: eliminar (LISTA)

Parámetros:
LISTA que se va a borrar

Devuelve:
undef si la clave no existe; de ​​lo contrario, devuelve el valor asociado con la clave eliminada

Ejemplo 1: Implementando delete() en un Hash

#!/usr/bin/perl
  
# Initializing hash 
%hash1 = ('Geeks' => 45, 'for' => 30, 'Now' => 40); 
  
# To delete the List passed as parameter
$deleted_element = delete($hash1{'for'});
  
# Printing elements of Hash 
print "$hash1{'Geeks'}\n"; 
print "$hash1{'for'}\n"; 
print "$hash1{'Now'}\n"; 
  
# Printing the deleted element
print "Deleted element: $deleted_element";

Producción:

45

40
Deleted element: 30

Ejemplo 2: Implementando delete() en una array

#!/usr/bin/perl
  
# Initializing array
@array1 = (10, 20, 30, 40, 50, 60); 
  
# To delete the array element at index 2
$deleted_element = delete(@array1[2]);
  
# Printing elements of Array 
print "Updated Array: @array1";
  
# Printing the deleted element
print "\nDeleted element: $deleted_element";

Producción:

Updated Array: 10 20  40 50 60
Deleted element: 30

Publicación traducida automáticamente

Artículo escrito por Code_Mech y traducido por Barcelona Geeks. The original can be accessed here. Licence: CCBY-SA

Deja una respuesta

Tu dirección de correo electrónico no será publicada. Los campos obligatorios están marcados con *