Perl的$*变量曾经做过什么？
在Perl编程语言中，$*变量是一个特殊的全局变量，它代表了当前正在执行的子程序的参数列表。这个变量可以用于访问传递给子程序的参数，并且可以用于修改这些参数的值。
在早期的Perl版本中，$*变量还有一个更为常见的用途，即作为一个全局哈希表，用于存储全局变量。然而，这种用法已经被弃用，因为它可能会导致命名冲突和安全问题。现在，应该使用our关键字来声明全局变量，而不是使用$*变量。
总之，$*变量在Perl编程语言中有多种用途，但是最常见的用途是作为子程序参数列表的别名。在现代Perl编程中，应该避免使用$*变量来存储全局变量，而应该使用our关键字来声明全局变量。
相关·内容
据我所知，Linux的每个桌面/服务器发行版都默认安装了Perl (和核心模块)，AIX和Solaris (IIRC)也是如此。
默认情况下，我的意思是即使是最轻量级的变体也有它。
我没有做过BSD或类似的工作，他们有Perl吗？
动机:我正在努力弄清楚，鼓励我团队中的人使用Perl而不是awk/sed/其他文本实用程序是否有意义。
注：哪个是sed、awk、perl和sh中最便携的？没有回答我的问题。可移植性--这不是我关心的主要问题，可用性是现成的。即使所有类似unix的系统都有awk/sed，我仍然更喜欢Perl。
注意:另外，Perl是指Perl 5.8+。
浏览 0提问于2020-02-17得票数 13
在这里，我尝试在perl环境中使用Bioperl模块。我的配置是
Windows /32
Active Perl 5.10.1
Bioperl 1.6.1
Padre和Per Studio 2010 IDE
作为安装指南，我通过了并使用了PPM方法。我安装成功了。
为了检查Bioperl是否起作用，我进一步遵循：
use Bio::Perl; // Is working without error
但当我试图做进一步的检查时
#!C:\Perl\bin
use Bio::Perl;
use strict;
$seq_object = get_sequence('
浏览 3提问于2011-01-15得票数 1
回答已采纳
4回答
我试图用某种格式来查找日期，我以前用perl(strftime)做过，但那一次我提到了一个静态时间，这次我需要一个变量$CURRENT_DAY。
下面是问题，当使用DAYHOUR=86400和一个整数来相等CURRENT_DAY时，变量给出了正确的时间，但是一旦我在语句中放入$CURRENT_DAY变量，日期就不会减少。
$ DAYHOUR=86400
$ DAY=1
$ CURRENT_DAY=`echo $(($DAYHOUR*$DAY))`
$ DD=`perl -e 'use POSIX; print strftime "%d", localtime time
浏览 0提问于2012-12-20得票数 1
2回答
有人能列出一套在Windows7上安装OpenSSL的完整步骤吗？我尝试了很多东西，但总是发现一个或另一个库丢失。我知道OpenSSL依赖于libxml2、pthread库等等。我试过从各种来源下载它们，但我对一个接一个出现的许多错误感到有点沮丧。如果有人以前做过，如果你能帮助我的步骤列表，那就太好了。
浏览 0提问于2012-11-21得票数 3
回答已采纳
我有一些perl应用程序&模块，我用它们来完成许多任务。
我想将它们捆绑在一起，并在它们周围放置一个可口可乐包装器，这样我就可以将它们分发给其他人。
假设我可以强制使用捆绑的OSX perl并在我的应用程序中包含我需要的模块，这样做有什么实际问题吗？我真的不想重新实现我已经做过的所有事情。
浏览 0提问于2012-02-14得票数 0
在Perl中，您可以编写类似这样的代码
while(!eof){
doSomething(x,y);
print $_;
}
第二条语句使用$_打印出循环要进行的迭代，Perl使用不可见变量的名称来迭代循环。在Java中，该变量的名称是什么？
我意识到，你可以通过在循环外声明一个变量并递增它来完成同样的事情，但如果有人知道如何做到这一点，这种方式肯定会更优雅。
浏览 0提问于2011-09-19得票数 7
回答已采纳
1回答
我对从我正在开发的Delphi Win32应用程序连接到使用Thrift的Evernote Service API很感兴趣。我在Delphi中几乎没有做过web服务的工作，在Thrift中也没有做过任何工作。从Delphi中使用Thrift最好的地方是什么？
浏览 1提问于2009-07-29得票数 3
回答已采纳
1回答
perl目标any ：在perl的@INC数组中预注入perl版本5.8.4的Solaris 10框中，，这应该可以在中得到调用perl！，其中包括ssh非交互式登录.
所以，就像：
ssh my.solaris.10.box 'perl -MSpecialModule -le "print qq/Powerball!\n/"'
工作而不抛出我Can't locate SpecialModule.pm in @INC (@INC contains: /usr/perl5/5.8.4/lib/i86pc-solaris-64int /usr/perl5/5
浏览 0提问于2016-01-12得票数 1
1回答
一个非常简单的问题，但不是我以前做过的事情，我已经断断续续地玩了一段时间了。
基本的概述是，我一直在尝试不同的方法来生成基于程序的星景，其想法是它可以生成包含在更大范围内运行的“星座”的显示。
最终的想法是连接一台(或两台)激光投影仪，但您可以使用DAC和Galvos运行这些投影仪。同时，我想简单地输出到一个标准的监视器上，虽然我可以用C#和Visual Basic做到这一点，但.NET的图形输出是我从来没有做过的事情。
谁能给我指出我应该看什么的正确方向？我只想创建一个可以映射到starscape数组的X×Y窗口。
浏览 1提问于2013-05-18得票数 1
2回答
除了ActiveState的PerlApp之外，还有什么工具可以将Perl GUI应用程序、库、解释器等等捆绑到OS上的独立应用程序中？
浏览 0提问于2012-08-14得票数 3
回答已采纳
1回答
有没有办法在Windows环境中为旧的Perl CGI应用程序使用NetBeans或Eclipse？
我目前有PHP的NetBeans。
注意:我是一个PHP开发人员，曾经做过.NET。我对CGI知之甚少，我只需要修改一个现有的遗留应用程序。
浏览 0提问于2010-07-14得票数 1
回答已采纳
我希望在我的团队中设置一个单独的Perlbrew安装来共享，这样他们就不需要单独编译Perl版本了。因此，我设置了PERLBREW_ROOT，然后在网络驱动器上安装了Perlbrew。然后，我开始从..profile user文件中获取bashrc。
到目前为止还不错，但我不知道该让他们怎么做。文档中说，每个用户都需要首先运行"perlbrew“，但我自己从来没有这样做过。我所做的一切都在第一段。
无论如何，我应该告诉他们跑什么步骤？
浏览 3提问于2017-12-30得票数 0
回答已采纳
我是一个新的Perl，并试图创建一个xml文档。我看到了的一篇文章
#!/usr/bin/env perl
#
# Create a simple XML document
#
use strict;
use warnings;
use XML::LibXML;
my $doc = XML::LibXML::Document->new('1.0', 'utf-8');
my $root = $doc->createElement('my-root-element');
$root->setAttribute('s
浏览 3提问于2022-07-13得票数 0
回答已采纳
我对Perl很陌生，我正试图编写一个简单的程序来提示用户输入一个数字。然后我要把那个号码打印出来。我认为我有正确的代码，但当我运行程序时，我无法输入任何东西。我用的是崇高的文字2。我是不是漏掉了一个插件什么的？我怎么才能让这个起作用？在此之前，我只做过简单的if/ and语句，一切都正常。我只是不能提示用户输入。
以下是代码：
print ("Please enter a number: \n");
$seq = <STDIN>;
print("Sequence = $seq \n");
这是输出：
未初始化值$seq在级联(.)中的使用或C:\bl
浏览 2提问于2014-03-27得票数 2
回答已采纳
我有这样的目录结构：
$ ls -F
analyze/
data.pl
input.pl
logminer.txt
logSearch.pl
readFormat.pl
Version Notes.txt
datadump.pl
format/
logminer.pl
logs/
properties.txt
unzip.exe
我运行：
perl -e 'if (!(-d analyze)){ print "poo\n"}'
它会打印poo。
这里缺少什么？我之前做过这样的测试，它可以正确地识别该目录是否存在。为什么不是这个目录呢？
浏览 0提问于2012-07-19得票数 1
回答已采纳
我是Perl的新手，希望有人能告诉我这到底是什么意思
eval 'exec ${PERLHOME}/bin/perl -S $0 ${1+"$@"}' # -*- perl -*-
if 0;
浏览 0提问于2011-08-25得票数 0
回答已采纳
1回答
我已经构建了一个表单(使用JavaScript、jQuery、PHP和HTML)，它使非技术人员很容易编写和启动命令，该命令创建包含CentOS Linux的ISO镜像和与之一起构建的公司应用程序。以下是带有示例变量的实际命令。
./test.pl --verbose --output tvmTEST.iso --virtual --isv 4.1.5.1.4147.8.0 --64bit --netproto static --hostname tvmTEST --address 192.168.5.235 --netmask 255.255.255.0 --gateway 192.168
浏览 3提问于2012-08-17得票数 1
1回答
比较plist键
、、
我正在尝试添加一个关于API的健全性检查，这往往会非常快地改变它的结构，因此我在考虑添加一个例程检查，它将json响应存储在date+time的plist文件中，因此对于关键结构，与之前的日期进行比较，看看是否有任何变化。有没有什么python、shell或perl脚本已经写好了呢？我不想重新发明轮子，所以我想之前可能有人已经做过了？
浏览 0提问于2012-10-28得票数 1
回答已采纳
请解释下面的代码片段可以在Perl脚本中做些什么，
if (! -e '/etc/httpd') {
print "Something";
}
我找不到确切的场景或条件来使此条件为“真”。这篇也没有对此做过多的解释。
确切地说，-e交换机在这种情况下会做什么？
浏览 1提问于2018-08-10得票数 5
回答已采纳
1回答
昨天晚上我在这里读到了一个mysql调优程序。我安装了它，它告诉我需要一个比我现有的perl版本更高的perl版本。我下载并安装了perl 5.12.x
突然，我的Munin实用程序抛出了这样的错误: Can't locate RRDs.pm in @INC (@INC包含: /usr/lib/perl5/site_perl/5.12.2/i686-linux /usr/lib/perl5/site_perl/5.12.2 /usr/lib/perl5/5.12.2/i686-linux /usr/lib/perl5/5.12.2 /usr/lib/perl5/site_perl/5.
浏览 7提问于2010-12-12得票数 1
回答已采纳
我将从头开始编写一个框架。我正在考虑使用Expect.pm或telnet.pm模块连接到远程系统。
由于我在这两个方面都做过工作(非常基本)，我不知道一个模块相对于另一个模块的好处。
如果这里的人知道什么是区别和优势，请分享想法/想法或链接，我可以研究。
浏览 3提问于2013-10-29得票数 1
回答已采纳
在更新到macos big sur 11.3 (20E232)后，我不能再从终端启动mytop。
启动通过brew安装的mytop时，我收到以下错误：
> mytop
ListUtil.c: loadable library and perl binaries are mismatched (got handshake key 0xc500080, needed 0xc400080)
> which mytop
/usr/local/bin/mytop
> ls -la /usr/local/bin/mytop
lrwxr-xr-x 1 username admin
浏览 0提问于2021-04-29得票数 2
到目前为止，我工作的项目只在源代码中使用了ASCII。由于UTF中的几个即将发生的变化，以及我们在测试中需要一些Unicode字符串，我们正在考虑咬紧牙关，将源代码转移到I18N -8，同时使用utf8杂注(use utf8;)。
因为代码现在是ASCII的，所以我不希望代码本身有任何问题。然而，我不太清楚我们可能会得到的任何副作用，但我认为考虑到我们的环境(perl5.8.8，Apache2，mod_perl，带有FreeTDS驱动的MSSQL Server )，我很可能会得到一些副作用。
如果你在过去做过这样的迁移:我能预料到什么问题？我该如何管理它们？
浏览 0提问于2009-11-25得票数 7
回答已采纳
散列和标量在不同的命名空间中。所以我可以这么做：
%foo = %bar
而不用担心搞乱%bar的价值。
为什么相同的逻辑不适用于文件句柄？如果我这么做：
*FOO = *BAR
我不仅让<FOO>和<BAR>做了同样的事情，我还修改了$FOO、@FOO和%FOO。
这是因为Perl最初是这样写的，并且根深蒂固吗？因为没有更多的非字母数字前缀字符了？还是有什么理由让它这样运作？
浏览 4提问于2013-06-06得票数 2
我有一个子例程，它的标识符定义如下
*VALID_NAME_REG_EX = \"[ a-zA-Z0-9_#.:@=-]+";
*MACRO_VALID_NAME = \"MACRO_VALID_NAME";
我进一步查看了这份文件。它们被称为$MACRO_VALID_NAME。
我想它正在用字符串的右边替换值，但是我不确定，我想要一个确认。
浏览 13提问于2016-01-29得票数 6
回答已采纳
3回答
我怎样才能限制apt镜像的带宽？
、、、、
我需要对所有的Ubuntu存储库做一个一次性镜像(记录在案，因为我将它发送到肯尼亚(请参阅这里和这里)。
我以前做过，并使用了贴面镜，而这正是我想要的。但是现在我想慢慢来，所以我想限制它用来下载的带宽。有什么简单的方法吗？任何神奇的apt配置设置？
浏览 0提问于2009-11-27得票数 12
回答已采纳
2回答
使用命令行查找和替换？
、、、
我试图使用命令行来查找和替换一些文本。我有一个文件，有几百万行类似于此：
Something-Here/Grafton-WV</loc>
More-Information/Claremore-OK</loc>
This-Is-It/Seminole-OK</loc>
Your-Company/Lunenburg-MA</loc>
我要做的是去掉斜杠和后面的所有东西。我以前做过通配符“查找/替换”，但我不确定需要使用什么命令才能从斜杠开始，并一直持续到行尾。
以下是输出的内容：
Something-Here
More-Information
Thi
浏览 0提问于2014-08-07得票数 0
回答已采纳
电信测试是一个有趣的利基领域，您要么使用昂贵的商业工具解决方案，要么使用开源解决方案(例如SIPp)进行测试，但它们并不总是一刀切的。
我想知道是否有人做过电信测试，包括集成不同的工具(最好不是来自同一个供应商)和/或集成用于关键字/数据驱动测试或BDD的测试框架。显然，像Empirix Hammer、神灵和SIPp这样的工具不一定提供这些框架特性。如果有人做过这样的整合工作，很想听听他们的经历。写一篇博客文章就太棒了。
浏览 0提问于2013-01-20得票数 2
1回答
我正在尝试将多个音乐扩展与我的程序(mp3、wav等)相关联，我已经看到了许多不同的方法。但是哪一个是最好的呢？
有些方法似乎很难(当编辑注册表等我以前从未做过的事情时)，而有些则不是。
但吸引我眼球的是，转到项目的属性(在Visual Studio中)，然后“发布”>“选项”>“文件关联”，然后在那里添加关联。
这个方法似乎是最简单的，所以我试了试，但我似乎不能让它工作。每次我尝试用我的程序打开.mp3的时候，弹出一个消息框并告诉我
“您选择的程序不能与此文件类型关联。请选择另一个程序”
如果有人使用这种方法关联了文件类型，如果您知道这个问题的原因，我会很高兴。
谢谢。
浏览 0提问于2014-02-09得票数 2
1回答
我正在开发一个通用SSIS包，它接收一个平面文件，向它添加新列，并生成一个新的平面文件。
我遇到的问题是，新列的数量根据存储过程XML参数的不同而变化。我尝试使用“”来调用BCP，但是XML参数对于命令行来说太长了。
我在web上搜索，发现您不能在运行时动态更改SSIS包，而且我必须使用脚本任务来生成输出。我开始沿着这条路走下去，发现您仍然必须让脚本组件知道如何接收可能的列，这正是我在设计时所不知道的。
我从中找到了一个第三方SSIS扩展，但我想不做任何扩展。
有人做过这样的事吗？
谢谢!
浏览 4提问于2011-07-14得票数 3
回答已采纳
我是一名Ruby开发人员(生物信息学分析，已经有几年没有做过Ruby on Rails了)，在空闲时间，我负责一个非常简单的基于Perl的网站。
尽管有很多资源可以教授Perl，但我希望能有一些针对Ruby程序员的资源，这样我就可以利用这两种语言的相似性。是否有这样的资源，或者从Perl到Ruby的流量几乎是单向的？
浏览 0提问于2010-10-22得票数 5
现在尝试获取CVS数据名和IP，并将其放入命令中进行批量创建。我被困在这里是编译错误：
Global symbol "$name" requires explicit package name at ./interoperable.pl line 8.
Global symbol "$ip" requires explicit package name at ./interoperable.pl line 9.
Global symbol "$name" requires explicit package name at ./interopera
浏览 1提问于2022-04-04得票数 -3
作为这一个的后续问题：
我使用curl命令在多台远程计算机上下载一个文件，并使用--limit-rate参数限制正在使用internet的计算机上的下载速度：
极限速率10k -r 104857601-209715200 -o disro2.iso 'http://files.cdn/distro.iso‘
因此，我必须定期监测每台计算机的互联网使用情况(就像每5秒一次)，并在互联网被用户使用时动态地降低--limit-rate，并在互联网使用变得空闲时增加它。因此，我唯一需要知道的是，远程计算机的用户是否正在使用他们的互联网(比如浏览网页或下载文件)。有什么简单的方法可以找出这个吗？
浏览 0提问于2014-09-07得票数 2
1回答
我想找出几种语言中不同的三个元音组合的数量。使用grep，我已经隔离了文本文件中出现的三个元音。这是我使用的代码：
'[aeuioj]{3}' *file name* -o
我发现人们以前也这样做过，请看下面的链接
只是现在我需要过滤掉输出中的所有重复，这应该会给我留下一个给定语言中所有三个元音组合的列表。我是grep的新手。
谢谢,
StWS
浏览 0提问于2013-02-28得票数 0
我做过：sudo apt update，但当我做sudo apt upgrade时，我得到：
The following packages have unmet dependencies:
perl-modules-5.22 : Conflicts: perl-modules
Conflicts: perl-modules:i386
我试过：
sudo dpkg --configure -a
sudo apt-get -f install
sudo apt-get install --reinstall perl-modules-5.22
s
浏览 0提问于2021-10-18得票数 3
我对Perl很陌生，我一直在关注一本书。一切都很好，除了当我试图初始化一个变量，如书中所示，我得到了一个错误，如下所示。请告诉我该怎么做才能避免这个错误？
代码：
#!/usr/bin/perl -w
use 5.014;
use strict;
use utf8;
$radius = <STDIN>;
$circum;
if ($radius<0){
$circum = 0
} else{
$circum = 2*3.141*$radius;
}
print $circum."\n";
错误:全局符号"$radius“在./example
浏览 4提问于2013-12-13得票数 1
回答已采纳
我还没有这方面的测试用例，还在挖掘中。我已经创建了一个漂亮的二进制文件编辑perl脚本，该脚本对一些二进制构建进行了注释，这些构建是我们使用的专用编译器的输出。我想把这个back注解作为构建后的步骤。当我在powershell中对二进制文件运行该脚本时，它工作得很好。当我将它作为构建后事件运行时，它崩溃了，并显示：
1> Perl5LIB is C:/StrawberryPerl/perl/site/lib;C:/StrawberryPerl/perl/vendor/lib;C:/StrawberryPerl/perl/lib
1> Invalid type 'Q&
浏览 3提问于2020-07-10得票数 1
我想调用其他Perl脚本，以便使用主Perl脚本执行争用测试。
像这样的东西目前是有效的：
system("perl 1.pl");
system("perl 2.pl");
exit;
然而，我想把它们作为同时运行的独立线程来启动。
根据我在谷歌上的搜索，我试着这样做：
system(1, "perl 1.pl");
system(1, "perl 2.pl");
exit;
这不管用。主脚本立即存在，这很好，但是我想要产生的底层线程不会被踢开。我想知道是否有其他事情我必须做，或者是否其他人做过这样的事情。
提前感谢您的帮助。
浏览 3提问于2009-09-04得票数 5
回答已采纳
1回答
使用Matlab，我正在尝试从一个网站下载一个文件，该文件要求您先登录。我尝试下载的文件是 ()
我猜这涉及到cookie和侵入urlwrite函数中的java代码。有没有人这样做过，或者有没有人知道我是怎么开始的？有没有什么标准的方法可以登录并获取cookie，然后将cookie与将来的请求一起传递回来？
浏览 9提问于2011-03-14得票数 4
3回答
假设我们有一个需要web抓取的项目。(解析字符串(< 40)和抓取网页(获取元数据等等)我知道perl有非常好的适合这项工作的cpan模块，所以我可以采用这种方式，不用太麻烦自己。但我对速度和内存相关的东西一无所知。
那么，你会选择哪一个呢？(可能是Python??)在速度方面，哪一个更适合这项工作？请解释一下。
提前谢谢。
浏览 0提问于2011-04-04得票数 4
回答已采纳
2回答
我正在帮助我们的一个学生在Windows7(64位)上使用NetCDF文件进行一些数据访问。谁有什么起始面包屑？
蒂娅
rw
浏览 0提问于2013-04-10得票数 1
3回答
在Perl中，假设我在名为$character的变量中有字母A，我想让它升到B，我该怎么做呢？$character也可以是数字(0-8)，我希望该方法在这两个数字上都有效？(类似于二进制移位，但不能完全确定是否是这样)。提前谢谢。
浏览 0提问于2012-07-16得票数 3
回答已采纳
1回答
我想知道我应该得到什么样的机器来做一个反向代理。我从来没有做过一个，所以我有点困惑，我应该寻找什么样的规格。所以我想我的问题是..。对一台机器来说，转发会有多贵？一天50,000次联系？我应该找什么样的机器？
浏览 0提问于2011-02-11得票数 0
回答已采纳
我有一些代码，其中我正在转换平面文件中的一些数据元素。我将旧的:新值保存到一个散列中，该散列在处理结束时被写入到文件中。在后续执行时，我重新加载到散列中，以便可以在其他数据文件中重用先前转换的值。我还保存了最后一个转换值，因此如果我遇到一个未转换的值，我可以为它分配一个新的转换值，并将其添加到散列中。
我以前(在二月份)在六个文件上使用过这段代码，没有任何问题。我有一个变量被设置为ZCKL0 (最后一个字符是零)，它是从保存最后使用的值的文件中检索出来的。我应用了增量运算符... $data{$olddata} = ++$dataseed；...$dataseed中的结果值是1，而不是ZCKL
浏览 2提问于2011-05-14得票数 1
2回答
我从来没有做过perl编程，但我看的是下面的Perl代码，它使我感到困惑：
sub read_pds
{
my $bin_s;
my $input_pds_file = $_[0];
open(my $fh, '<', $input_pds_file) or die "cannot open file $input_pds_file";
{
local $/;
$bin_s = <$fh>;
}
close($fh);
return $bin_s;
}
我正在查看上面的代码，尽管它不会返回任何值，
浏览 3提问于2014-01-30得票数 1
回答已采纳
我的问题建立在有关SUID利用的问题的答案之上：
利用后未使用SUID
该人(正式答复)表示：
许多流行的sh丢弃特权实现在启动时:它们将有效的UID重置为真正的UID。这包括bash、dash、mksh和BusyBox sh，因此在Linux上您将看不到任何其他内容。
那么，我的问题是，哪些shell不执行如此重要的安全检查？
我在我的Ubuntu机器(18.04)上测试了它，似乎所有的shell都在执行这样的安全检查：
ubuntu@ubuntu: cat /etc/shells
# /etc/shells: valid login shells
/bin/sh
/bin/bash
/bi
浏览 0提问于2019-08-04得票数 2
回答已采纳
我尝试用UTF-8在Perl中创建/保存HTML文件，但是到目前为止我还没有做过任何工作。一个说要使用二进制模式，所以我试了一下。下面是我的代码：
open (OUT, ">$sectionfilename");
binmode(OUT, ":utf8");
print OUT $section;
close OUT;
当我在记事本之类的文本编辑器中打开这些文件时，它们仍然是ANSI编码。我做错了什么？
浏览 1提问于2010-02-26得票数 14
扫码
添加站长 进交流群
领取专属 10元无门槛券
手把手带您无忧上云
相关资讯
热门标签
云服务器
ICP备案
对象存储
实时音视频
云直播活动推荐
腾讯云开发者
