Perl pop简介

Perl pop简介

Perl pop是一个函数，可以用来在数据结构概念中弹出元素，如堆栈、列表、数组等，在LIFO（Last In First Out）的位置插入元素，因此用户输入的值被弹出，无论最近添加的是什么值，在弹出的值中也可以传入参数，弹出的值明确传入数组，在完成从数组弹出的操作后，内存中的大小将自动减少，该元素的参考值也将从内存中删除。

语法

Perl脚本使用了一些数据结构的概念，如push和pop。它主要用于操作数据，并减少内存以快速执行操作。pop()功能必须从数组或内存中的任何其他数据结构中删除最后一个元素。

@var =(‘ ‘);
print pop(@var);
----some perl script codes depends upon the user requirement the perl functions will be called and used in the file---

上面的代码是Perl脚本中使用的pop()函数的基本语法；用户输入的值在数据结构中被弹出。

pop函数在Perl中是如何工作的？

• Perl脚本使用一些默认的函数、关键字、变量来创建复杂的应用程序。同样，我们也使用了一些数据结构的概念，如数组、堆栈、队列、推、弹、移等，以保证数据的安全，并减少内存中的数据使用量。Perl数组使用pop()函数来删除数组的最后一个元素；它还指出了数据集合和结构概念中的堆栈。它也用于移除、返回或弹出数组中的最后一个元素。
• 这意味着要减少数组中的元素数量。一般来说，元素的最后阶段或位置是在堆栈内存中自动生成的最高级别的索引。另外，元素的pop()函数从数组列表的右边位置砍掉元素，并尽快返回元素，以在内存中一个接一个地自动减少元素的大小。数组元素也被认为是从上到下的数字框的堆栈，增加元素的大小，使堆栈内存的底部被弹出内存。

Perl pop的例子

下面给出的是Perl pop的例子。

例子 #1

代码

#!/usr/bin/perl -w
@var = (7654,3876,2736,91237,237,9273,36483,12973,2739,918723,9273,8263,912873,9812732,973924,192873184,9210838,91723,90238,921838);
print("Welcome To My Domain", pop(@var), "After using the pop() function in the script it return the value as recently removed in the list",@var, "\n")

输出

在上面的例子中，我们使用了一个像@var这样的基本变量来初始化这些值；将它们存储在数组中会很冗长。所以每个值都有一个单独的引用，它持有对堆栈内存位置的引用，因为当我们在堆栈中删除特定的元素时，它也持有对内存的引用，所以内存损失将由于避免内存泄漏和在内存中删除的消耗而发生。如果我们使用pop()函数，它将删除数组中从左到右位置的最后一个元素；该元素的最后位置是921838，它将被删除在堆栈内存中。

例子 #2

代码:

use strict;
use warnings;
my @var = qw(+ - * / %);
pop @var;
print "Welcome To My Domain its the first pop() function used in the stack memory \n \n @var\n";
push(@var, '>', '<');
print "After Inserting the aboev two operators in the stack memory the variable and the array size is shown \n \n @var \n";
my @var1 = qw(74 dg dgh wehf whewf jh e wiejh eih eihrf 3748 jh48 hef 4897y jhef 4 9y8 hr 9 4 herfu9 jkd jdeij iejhfb wefih);
pop (@var1);
unshift @var1, 'Have a Nice Day User';
print "After using the unshift() function in the pop() functionality the stack memory of the varaible is shown \n \n@var1\n";
my @demo = ('1'..'100');
unshift(@demo, pop(@demo));
print "We compared the unshift() functionality in the pop() function the result is: \n \n\@@demo = @@demo\n";

输出

在第二个例子中，我们使用了一些不同的函数，如unshift和push()的功能。在移除堆栈中的最后一个元素后，这个特定值的内存引用也被清空。它处于空的空间，所以它将通过使用push()操作被其他元素占据；它将被插入到数组列表中。当我们使用unshift()函数时，我们可以调用pop()函数和用户输入变量来比较脚本中的两个功能。这里我们在变量@demo中使用了1...100；它将在unshift(@demo, pop(@demo))方法中被调用，用于比较不同目的的相同变量值。

例子 #3

代码

use strict;
use warnings;
my $var = pop @{[split m|k|, "www.facebook.com"]};
print "Welcome User after using the split() function in pop() out the result is: \n $var\n";
my $var1 = ['55gtg', 'fu', 'erhgfb', 'jwehg', 'jehwgfvj'];
pop @$var1;
print "Have a Nice day user after popped out the elements from the array list is: @{$var1}\n"

输出

在最后一个例子中，我们又使用了一个额外的函数作为分割，用于分割给定字符串中的字符。这也是字符串功能，所以它将把字符串分割成每个字符，所以通过使用分隔符，即）这里我们使用m|k|这里的'm'是关键字，使用||符号里面的'k'是字符，所以在'k'之后，所有其他的值都列在pop函数中，所以这将被显示出来，并将在输出控制台返回。这是pop()函数中用于分割的基本功能之一。

总结

在结论部分，Perl脚本在应用程序中使用了很多默认的方法和它们的属性。同样，pop()也是使用Perl脚本的数据结构的漂亮功能之一。使用这些函数，我们将从数据结构中删除最后一个元素并减少内存。