Delete all remaining elements : splice « Array « Perl
- Perl
- Array
- splice
Delete all remaining elements
@array = ( 0 .. 20 );
@array2 = ( A .. F );
print "\@array: @array\n";
print "\@array2: @array2\n\n";
splice( @array );
unless ( @array ) {
print "\@array has no elements remaining\n";
}
Related examples in the same category