push() function in Perl is used to push a list of values onto the end of the array. push() function is often used with pop to implement stacks. push() function doesn't depend on the type of values passed as list. These values can be alpha-numeric.
Perl
Output:
Perl
Output:
Syntax: push(Array, List) Parameter: Array: in which list of values is to be added List: which is to be added using push function Returns: the number of elements in new array.Example 1:
#!/usr/bin/perl -w
# Original Array
@array = ( 10, 20, 30 );
# Printing Array elements
print "Original Array: @array \n";
# Calling push function to
# add a list of elements
push(@array, (35, 40, 55));
# Printing Updated array elements
print "Updated Array: @array \n";
Original Array: 10 20 30 Updated Array: 10 20 30 35 40 55Example 2:
#!/usr/bin/perl -w
# Original Array
@array = ( 10, A, 30 );
# Printing Array elements
print "Original Array: @array \n";
# Calling push function to
# add a list of elements
push(@array, (F, G, H));
# Printing Updated array elements
print "Updated Array: @array \n";
Original Array: 10 A 30 Updated Array: 10 A 30 F G H