有什么方法可以改变Perl中常量的值吗？
在Perl中，常量是指在程序执行过程中不可更改的值。通常情况下，Perl中的常量是使用use constant关键字来定义的。这种方式定义的常量是无法更改的。
然而，如果你想要在运行时改变Perl中的常量的值，可以使用Scalar::Util模块中的readonly函数。readonly函数可以将一个标量变量设置为只读，使其在后续的代码中无法被修改。下面是一个示例：
use Scalar::Util qw(readonly);
# 定义常量
use constant PI => 3.14159;
# 尝试修改常量的值
PI = 3.14; # 这行代码会报错，常量无法修改
# 将常量设置为只读
readonly(PI);
# 再次尝试修改常量的值
PI = 3.14; # 这行代码不会报错，但是常量的值不会改变在上面的示例中，我们首先使用use constant关键字定义了一个常量PI，其值为3.14159。然后，我们尝试修改常量的值，但是会得到一个错误。接下来，我们使用readonly函数将常量PI设置为只读，这样在后续的代码中无法修改其值。
需要注意的是，使用Scalar::Util模块中的readonly函数来改变常量的值并不是Perl中推荐的做法。常量的目的是为了在程序中定义不可更改的值，以提高代码的可读性和可维护性。如果需要在运行时改变值的需求，应该使用变量而不是常量。
相关·内容
3回答
我想知道c++中的常量引用和常量指针有什么区别。当我声明某个东西是const ref时，我能改变它的值吗？还是常量在对象上呢？因为我知道常量指针意味着你不能改变指针，但是你可以改变它所指向的值。
例如：
const char& a; // ?
const char* a; // pointer is const
浏览 2提问于2012-05-02得票数 2
3回答
我有以下常量：
use constant => 7
是否有一个选项可以通过标量变量一次设置常量，然后该常数的值将是初始化的值，例如：
use constant => $scalar ->，那么从现在开始，常量在这一点上有标量的值。
有什么建议吗？
浏览 4提问于2014-01-28得票数 2
回答已采纳
5回答
我是个perl新手，
我可以简单地使用Perl中的64位算术吗？
例如
$operand1 = 0xFFFFFFFFFFFF; # 48 bit value
$operand2 = 0xFFFFFFFFFFFF; # 48 bit value
$Result = $operand1 * $operand2;
我基本上是在寻找perl中int64_t的替代品。
如果变量是有符号的还是无符号的，有什么可以提及的吗？
浏览 6提问于2009-12-08得票数 11
回答已采纳
our $TEST;
*TEST = \100;
$TEST =200
由于特殊原因，我想把TEST的值改成200，可以改吗？
浏览 0提问于2011-03-01得票数 0
回答已采纳
我想知道，-MO=Deparse是否向您展示了所有的Perl优化，为什么在Perl 5.10中没有将其折叠起来？
$ perl -MO=Deparse -e'[qw/foo bar baz/]->[0]'
['foo', 'bar', 'baz']->[0];
-e syntax OK
IRC上的一些人认为，O=Deparse可能并不是全部展示出来，但它确实显示了一些恒定的折叠。
$ perl -MO=Deparse -e'use constant "foo" => "bar
浏览 0提问于2010-08-24得票数 8
perl只是在解析源代码的过程中检查语法错误，还是还会根据参数/参数进行一些优化？
例如，如果我们运行：
perl source.pl debug=0
在source.pl内部有一个if条件：
if ($debug == 1) {...} else {...}
“预编译/解析”是否会优化代码，从而跳过"if“检查(当然，假设$debug只在代码的开头赋值，等等)？
顺便说一句，你知道TCL会这么做吗？乔戈斯
谢谢
浏览 0提问于2013-07-02得票数 1
我使用WWW::Mechanize对象作为常量，它对我来说工作得很好，但感觉有点奇怪。
use constant MECH => WWW::Mechanize->new(agent => 'my_app');
使用对象作为常量有什么“错误”吗？
浏览 2提问于2017-05-23得票数 1
我正在构建一个ios应用程序，在其中我需要控制多个文件(图像，但不仅仅是)的下载。我需要优先下载文件，这可能会随着用户与应用程序的交互而改变。
我有任何方法来设置操作存储在nsoperationqueue中的顺序。我正在寻找的是一个具有nsoperationqueue内置功能的堆数据结构。
实现这一目标的最佳方法是什么？
浏览 0提问于2013-09-10得票数 0
我正在重复地从配置文件加载一系列散列(用JSON编写)，然后确保它们都没有更改。
所以，如果配置文件是这样的：
"sources" : [
{
"source_name": "A",
"interval" : 6,
"params" : {
"what" : "testA"
}
},
{
"source_name": "B",
浏览 7提问于2015-03-20得票数 0
万一,
A = "A"
B = "#{A}"
你叫B = "A"，对吧？
现在我想改变(A = "C")，希望B也能通过A来改变。
有什么方法可以做到这一点吗？
浏览 11提问于2019-07-15得票数 1
回答已采纳
14回答
有人能说出C#中常量的意义吗？
例如，这样做的好处是什么？
const int months = 12;
而不是
int months = 12;
我知道常量是不能改变的，但为什么不...在初始化之后不改变它的值吗？
浏览 0提问于2010-03-28得票数 14
在Swift中，我们用let表示一个不变变量。
我不明白的是你为什么要改变他们的财产。例如：
let lbl = UILabel()
lbl.textAlignment = .Right()
为什么您可以更改textAlignment？通过改变属性，我们不是也变异了变量lbl，它应该是常量吗？
浏览 3提问于2014-09-13得票数 9
回答已采纳
简略地说：
常数表达式
编译器识别源代码中的常量表达式，并用它们的值替换它们。得到的常量值必须在表达式的类型中表示。只要允许使用简单的常量，就可以使用常量表达式。
常量表达式中的运算符受与其他表达式相同的规则约束。但是，由于常量表达式是在翻译时计算的，因此它们不能包含修改变量(例如赋值)的函数调用或操作。
什么是常量表达？它没有定义常量表达式
常量表达式和不可修改的lvalue(例如数组名、用const声明的lvalue)之间有什么区别？
常量表达式总是非值的吗？
不可修改的lvalue常量表达式吗？
浏览 8提问于2017-08-14得票数 3
14回答
我知道关于常量的一个大问题是，你不需要在到处使用常量的地方去修改和更新代码。这很好，但是假设您没有显式地将其声明为常量。接受一个实际上不会改变的变量并使其成为常量有什么好处，这会节省处理和/或code...etc的大小吗？
基本上我有一个程序，编译器说一个特定的变量没有改变，因此可以声明为一个常量，我只是想知道向它添加常量限定符的好处是什么，如果没有区别，那么更改不会增加任何值，因此没有必要浪费时间(同样的情况发生在多个地方)，返回并“修复”所有这些变量。
浏览 11提问于2010-03-26得票数 15
回答已采纳
3回答
我有一个属性文件test.properties，其内容如下所示：
#DEV
#jms_value=devdata.example
#TST
#jms_value=tstdata.example
#DEV
#ems_value=emsdev.example
我想根据文件所在的环境取消对环境名称下的行的注释。
如果文件转到DEV环境中。我需要行下的所有'#DEV‘需要被取消评论。我使用了以下命令：
perl -i -p -e 's/#DEV\n#(.*)/#DEV\n\1/g;' test.properties
这不会改变文件中的任何内容。
有人能帮我找到解决办法吗？
浏览 3提问于2016-10-05得票数 2
回答已采纳
3回答
我正在阅读，提到的要点之一是创建子例程，即使对于那些看起来过于简单而没有自己的子程序的操作也是如此，以及这是如何帮助的。
我知道我可以使用关键字inline。但是，我从来没有遇到过在Perl中内联子程序的方法。
是否有一种方法可以告诉Perl解释器内联子程序调用(或者为什么不)？
浏览 5提问于2010-11-02得票数 11
回答已采纳
3回答
常量及其影响
、、
我开始在我的AS3代码中更多地使用const。我的理由是，如果一个值没有改变，那么为什么要让它成为一个var。
我从推特上听说，const值的优化方式与vars不同。由于twitter的简短和甜蜜，这里的细节到此为止。
有没有人有更多关于使用var和const的利弊的信息。
让我首先说明一个问题:在Flash Builder中，常量值在调试器中不可见。不改变的值似乎不值得在调试器中查看。
浏览 0提问于2010-12-16得票数 4
回答已采纳
我在试着弄清楚什么是静态瓦尔斯。
它们可以在不实例化类的情况下进行访问，但它们还有哪些其他好处，以及何时应该使用它们？
例如，我的类有一个私有变量，它包含我试图获取的twitter提要的名称。
这应该是静态的吗？它永远不需要改变。
浏览 4提问于2013-11-11得票数 0
回答已采纳
我只是想熟悉适当的术语。
什么数据结构可以是全局常量？它们必须是不可变的数据结构吗？
例如，我知道这将是一个全局常量：
THIS_CONSTANT = 5
但是，例如，列表可以是常量吗？假设它在整个程序中不会改变，即使它是一个可变的数据类型？
LIST_CONSTANT = [1, 2, 3, 4]
问我问题的另一种方式是，使用可变数据类型作为全局常量合适吗？
浏览 0提问于2015-08-03得票数 0
我试图在Enum值中包含一个常量，但我得到了致命错误Enum case value must be compile-time evaluatable (以下是代码)：
const PARENT = 'parent';
enum MyEnum:string
{
case firstChild = PARENT . '_child1';
case secondChild = PARENT . '_child2';
}
我不明白为什么会有这个错误，因为常数的值不能改变。我已经搜索了这个错误，但是我什么也没有发现。有什么想法吗？
浏览 2提问于2022-06-27得票数 1
回答已采纳
我在Eclipse Galileo上安装了E-P-I-C。当我运行Perl脚本时，什么也没有发生，因为我不相信Eclipse与Perl SDK之间有任何连接(这是正确的术语吗？我不知道它是否不同，因为它是Perl)。
我很确定这和C:\Perl\bin有关
如果单击Perl E-P-I-C项目，然后单击属性，则可以看到Perl include Path。我已经添加了上面的内容，但它没有改变任何东西。
归根结底是:如何在Eclipse Galileo中为Perl设置构建路径？
浏览 0提问于2011-07-23得票数 1
回答已采纳
6回答
在阅读有关Perl 6的文章时，我看到了一个被大肆鼓吹的特性，您不再需要这样做：
return "0 but true";
相反，...but可以执行以下操作：
return 0 but True;
如果是这样的话，事实在Perl6中是如何工作的呢？在Perl5中，这很简单: 0、"“和undef都是false，其他都是true。
当涉及到布尔上下文时，Perl6中的规则是什么？
浏览 4提问于2008-09-24得票数 27
回答已采纳
我是perl的新手，但我只是尝试打开一个文件并读取其中的一些行。
到目前为止，代码如下所示：
open FILE, "file.txt" or die "can not open file";
while (<FILE>) {
print if ($.== 3..5)
}
但我需要能够更改要获取的行。因此，这3和5个数字需要是变量。
另外，有人能帮我更好地理解这段代码吗？我想知道什么是$。以及如何将print命令替换为将其放入数组或其他内容中，以进一步处理这些行？
谢谢!
浏览 0提问于2012-07-25得票数 2
回答已采纳
2回答
如何根据分辨率密度改变textSize？
我已经找到了几种方法，但所有这些方法都使用java代码来实现。
但是，我需要一种java免费的方法，因为我有一些地方可以在XML上设置textSize，而有些地方则设置在Java代码上。
在xml中，我会这样做。
android:textSize="@dimen/FONT_SIZE_SMALL"
但是，有时我需要通过java代码来设置它。
textView.setTextSize(TypedValue.COMPLEX_UNIT_PX, getResources().getDimension(R.dimen
浏览 4提问于2016-01-21得票数 1
回答已采纳
4回答
#include <stdio.h>
int main(void) {
int a[] = { 10, 11 };
int * const ptr = a;
*ptr = 11; /* Here the value should be properly changed as I have taken
const pointer (address of the pointer can not be changed) and not pointer to
const (data pointed by the pointer can
浏览 0提问于2017-07-14得票数 0
我在编写一个模块作为我的应用程序的一部分时，我注意到语法检查的结果是警告常量(1)的无用使用。为什么会这样呢？
常量是模块末尾必须使用的1，通常会被警告所忽略，说：
对于等于0或1的数值常量，将不会发出此警告，因为它们经常用于以下语句：
1而sub_with_side_effects()；
(这可能有更好的来源。毕竟，文件末尾的1是完全想要的，不需要被警告。)
但是，即使对于几乎为空的模块(如果是use bigint )，也会产生警告。
package Foo;
use bigint;
1;
对于这个简单的文件语法检查，会产生以下警告：
$> perl -Wc Foo.pm
浏览 1提问于2015-01-28得票数 8
回答已采纳
我有ActiveState提供的针对mswin32-x86的perlv5.6.1-多线程二进制版本638。
我正在编写一个Perl脚本，在该脚本中我声明了一些常量，稍后将用于比较。由于某些原因，我得到了一个错误，指出在脚本的第31行(下面代码中use Constant子句之后的行)，常量名称所在的行中有无效字符。我检查并发现常量名称中的'_‘(下划线)是一个合法字符。我还试图将“0.00”更改为“0”，以查看这是否是原因，但我得到了相同的错误。我不确定我做错了什么。有人知道为什么编译器不喜欢这样吗？
谢谢!
代码如下：
use constant {
MIN_NET_DLR =>
浏览 3提问于2009-02-03得票数 4
回答已采纳
如果我有一些带有(绝对)静态键集的散列，我能避免在运行时按键计算对此散列元素的每次访问的散列函数吗？
比方说，我有一个带有键的静态关联数组%saa：
my %saa = (
A => "aaa",
B => "bbb",
C => "ccc"
);
如何在编译时预计算这些键的哈希函数值，并在运行时以有效的方式使用它，就像使用索引访问简单列表元素时那样。
正如我现在所知道的，在perl5中，它只能作为使用lists (use constant A=>0, B=>1...; $saa[A]="ddd"
浏览 1提问于2018-04-11得票数 1
回答已采纳
4回答
如何在Perl中使用宏，就像在C中一样？
示例：
#define value 100
print value;
我想将输出设为100。
浏览 0提问于2010-03-26得票数 3
回答已采纳
2回答
我使用ActionCable，每隔3秒(在ActionCable库中提到)从服务器接收pings。我的问题是:如何改变订阅时的ping间隔？
有什么想法吗？
浏览 9提问于2016-05-20得票数 8
我使用Log::Log4Perl为我的perl脚本进行日志记录。一切都很好，除了一件事；我有一些通用模块用于不同的脚本(并由不同的用户运行)。我希望这些日志文件具有-rw-rw-rw-权限，但是下面的代码似乎没有帮助：
在我的/etc/log4perl.conf里
# Logger for /usr/local/bin/script.pl
log4perl.logger.SCRIPT=DEBUG, SCRIPT_LOG
log4perl.appender.SCRIPT_LOG = Log::Dispatch::FileRotate
log4perl.appender.SC
浏览 3提问于2013-04-03得票数 1
1回答
我试图在中发布以下JSON
use Mojo::UserAgent;
my $ua = Mojo::UserAgent->new;
my $ip = ...
$mojo->post( 'https://$ip:443/query' => json => { value=> True, Query => ... } );
我犯了个错误
Bareword "JSON::true“不允许使用”严格的subs“
但是，如果我将它设置为True，它将被解释为一个字符串，而不是一个JSON真值。
知道如何发布JSON的真实值吗？
浏览 3提问于2015-11-23得票数 1
回答已采纳
1回答
不确定我是否正确地表达了这个问题，但这是我的问题:我有一个基类和一个子类，并且我的基类永远不应该自己实例化(在其他语言中它将是抽象的)。我知道抽象类在Swift中是不存在的。我有一些计算出来的只读属性，可以改变它们在每个子类中返回的内容；它们或多或少是自定义的常量。首先，重写计算属性是处理这类事情的最佳方式吗？其次，如果这些变量需要初始化，即不能为nil，那么它们在父类中应该初始化为什么？有没有其他方法表明父类不应该自己初始化？
浏览 16提问于2016-08-29得票数 2
回答已采纳
我有五种不同的方案:调试、发布、分期、生产、测试。我已经把他们都安排好了。
我想要根据指定的方案更改标签的文本和视图的背景色。
在AppDelegate中，我实现了以下方法：
func setDomainEnv() {
#if Debug
serverEndPointURL = "www.debug.com"
var fancyBackgroundColor = UIColor(hue: 0.007, saturation: 0.589, brightness: 0.572, alpha: 1.0)
浏览 0提问于2018-07-25得票数 0
回答已采纳
2回答
手头的问题是找出内存泄漏。我使用Devel::Refcount来显示我的应用程序中的哪些对象在不应该保留在内存中时被保留在内存中。
已经提出了三种方法来寻找到这些结构的难以捉摸的联系。
1-也许存在一种数据结构，可以让我获得引用我的对象的符号列表，这将是理想而直接的。
2-迭代所有定义的名称空间中的符号表，查找引用，并使用迭代堆栈确定其位置。
3-插入一个钩子，当特定引用的链接计数向上或向下改变时，我可以记录堆栈位置，以及保存链接的符号的地址。我可以用它来找出哪些符号直接持有我的引用。
那么这是可能的吗？这种自省很棘手，我可能非常了解perl，但我不知道如何做。我对padwalker的研究似乎
浏览 1提问于2013-06-22得票数 2
我有一堆Perl文件，它们接受一些文件名常量。我想在一个单独的文件中定义它们--类似于C中的头文件。在Perl中实现这一点的最好/最标准的方法是什么？
浏览 0提问于2009-09-20得票数 15
回答已采纳
3回答
我是一个初学者和阅读C底漆加。有个地方我搞不懂。我知道在整个程序中不能更改常量，当我读到以下内容时：
Initializing a Variable:
...
int hogs = 21;
int cows = 32, goats =14;
int dogs, cats = 94;
...
The various integers(21, 32, 14, and 94) are integer constants. When you write a number without a decimal point and without an exponent, C recognizes it a
浏览 9提问于2021-03-13得票数 2
回答已采纳
我正在做一个项目，我正在通过Java和Freemarker生成一些代码/脚本(特别是Perl脚本)。我现在已经让它工作了，但是我想知道是否有一些方法可以改变Freemarker中的默认变量分隔符($)？
或者，是否有不同的Java模板引擎可以使用更适合生成Perl脚本的变量分隔符？
浏览 1提问于2010-05-04得票数 3
回答已采纳
我想用变量在EF 7实体中设置[MaxLength()]数据注释。这是我的密码。
public static class Constants
{
public static byte IdentifierMaxLength { get { return 46; } }
public static byte NameMaxLength { get { return 64; } }
public static ushort DescriptionMaxLength { get { return 1024; } }
pu
浏览 7提问于2022-11-15得票数 0
回答已采纳
2回答
我使用以下命令：
perl -pi -w -e 's/EmployeeDataModel/EmployeeData/g;' *.java
这会改变一些东西，比如：
class EmployeeDataModel to class EmployeeData
但是，当使用以下内容时：
class="EmployeeDataModel"
它似乎什么也做不了。
对此有什么解决方案吗？
浏览 2提问于2013-06-25得票数 0
回答已采纳
2回答
在下面的示例中，为什么条件的计算结果为false？
$_ = "aa11bb";
if(/(.)\111/){
print "It matched!\n";
}
\11或\111对Perl不能“看到”\1有特殊的含义吗
浏览 2提问于2013-08-06得票数 4
public static final String Test = "ABC";
public static String Test = "ABC";
请给出java中"final static String“和"static String”的区别。除了最后一个是不能改变的，其他的区别是什么？谢谢。在更复杂的情况下，比如多线程和继承，什么都没有改变？
浏览 0提问于2013-01-07得票数 9
我有一个完美工作的代码： ActiveWorkbook.Worksheets("compleanni").Sort.SortFields.Add2 Key:=Range( _
"I6:I23"), SortOn:=xlSortOnValues, Order:=xlAscending, DataOption:= _
xlSortTextAsNumbers 我想像这样改变它： myorder="
浏览 27提问于2020-12-17得票数 0
回答已采纳
4回答
我有一些代码是在没有考虑常量正确性的情况下编写的。在任何情况下，改变这一点
class X
{
public:
X(X& rhs); // does not modify rhs
...
};
到这个
class X
{
public:
X(const X& rhs);
...
};
会改变现有程序的行为吗？我知道这一变化将允许编译当前未编译的代码，但我感兴趣的是，在任何情况下，已经编译的代码会改变它的行为。
类似的问题，做这样的改变有什么好处吗？
class X
{
public:
X(X& rhs); // does not
浏览 0提问于2013-04-22得票数 4
回答已采纳
常数和价值有什么区别？我们能够改变这两种价值观。
var app = angular.module(‘myApp’,[]);
app.constant(‘appName’,‘My App’);
app.value(‘applicationName’,‘Sample’);
浏览 5提问于2015-10-05得票数 4
回答已采纳
我有一个html文件的目录，我想删除其中的所有内容(包括匹配的表达式)。我已经尝试过了(其中XXXXXX我们要查找的字符串：
perl -pi -e "$a++if s/.*XXXXXX.*//si;$a||s/.*//s" *.html
我得到了这个错误(当我按enter时，它改变了我的命令，见第一行)：
perl -pi -e "$a=1 if *.htmla && s/.*XXXXXX.*//is; s/.*//s if *.htmla" *.html
Bareword found where operator expected at -e
浏览 0提问于2013-02-13得票数 1
5回答
Perl是否有符合最佳实践的枚举类型，或者更重要的是，它是否需要一个枚举类型？
我正在做的一个项目使用到处都是的字符串来表示在像C#这样的语言中通常使用枚举的东西。例如，我们在散列数组中有一组电话号码，每个号码都与一种电话类型("Home“、"Work”、"Mobile“等)相关联：
$phone_number->{type} = 'Home';
在这里使用只读变量集是否足够，或者应该使用Enum吗？我找到了一个，但它似乎使用了违反其中一个的赤裸裸的单词。我对使用的想法是这样的：
use Readonly;
Readonly my $HOME
浏览 73提问于2009-01-23得票数 60
回答已采纳
2回答
现在我有了这个：
public void focusChanged(Field field, int eventType) {
if ( field == txtAmount && eventType == 1)
{
getVirtualKeyboard().setVisibility(VirtualKeyboard.HIDE);
}
}
现在我的问题是键盘没有隐藏起来。我认为错误出在eventType参数中。标识LostFocus事件的数字是什么？我在“1”中硬编码了测试，但它似乎不起作用。
FocusChange
浏览 0提问于2010-09-02得票数 1
回答已采纳
扫码
添加站长 进交流群
领取专属 10元无门槛券
手把手带您无忧上云
相关资讯
热门标签
云服务器
ICP备案
对象存储
实时音视频
云直播活动推荐
腾讯云开发者
