使用Perl导入图像
Perl是一种通用的高级编程语言，广泛应用于各种领域，包括云计算。在云计算中，Perl可以用于导入图像数据。
导入图像是指将图像文件加载到程序中进行处理或分析的过程。Perl提供了多种方法来导入图像，其中一种常用的方法是使用Perl的图像处理库，如Image::Magick。
Image::Magick是一个功能强大的图像处理库，可以用于读取、修改和保存各种图像格式。通过使用Image::Magick，可以轻松地导入图像文件，并对其进行各种操作，如调整大小、裁剪、旋转等。
使用Perl导入图像的优势包括：
- 灵活性：Perl是一种灵活的编程语言，可以轻松处理各种图像格式，包括常见的JPEG、PNG、GIF等格式。
- 强大的图像处理库：Perl提供了多个图像处理库，如Image::Magick，可以进行各种图像操作，满足不同的需求。
- 多平台支持：Perl可以在多个操作系统上运行，包括Windows、Linux、Mac等，因此可以在不同的平台上导入图像。
- 丰富的社区支持：Perl拥有庞大的开发者社区，可以获得丰富的资源和支持，解决在图像导入过程中遇到的问题。
使用Perl导入图像的应用场景包括但不限于：
- 图像处理和分析：通过导入图像，可以对图像进行各种处理和分析，如图像增强、特征提取、目标检测等。
- 网络应用：在Web开发中，可以使用Perl导入图像，用于生成动态图像验证码、图像上传和处理等功能。
- 数据科学和机器学习：在数据科学和机器学习领域，图像是一种重要的数据类型。通过使用Perl导入图像，可以进行图像数据的预处理和特征提取，为后续的数据分析和建模提供支持。
腾讯云提供了多个与图像处理相关的产品，可以与Perl结合使用，实现图像导入和处理的需求。其中，腾讯云的云图像处理（Cloud Image Processing，CIP）服务可以帮助用户实现图像的上传、处理和存储等功能。您可以通过以下链接了解更多关于腾讯云云图像处理服务的信息：
https://cloud.tencent.com/product/cip
相关·内容
1回答
每当我试图为conda ()构建任何perl菜谱时，我都会得到以下类型的错误：
$ conda build /home/conda/recipes/perl-module-build/
+ source /home/conda/miniconda2/bin/activate /home/conda/miniconda2/conda-bld/perl-module-build_1526324675451/_t_env
+ /home/conda/miniconda2/conda-bld/perl-module-build_1526324675451/_t_env/bin/python -s /h
浏览 1提问于2018-05-15得票数 0
回答已采纳
我正在使用一个服务来发送图片到服务器，他们要求图像在发送之前转换为base64格式。我用下面的代码尝试了MIME::Base64：
use MIME::Base64 ();
open (IMAGE, "C:\\wamp\\www\\image.png") or die "$!";
$base64_string = IMAGE;
$encoded = encode_base64($base64_string);
print "Encode $encoded";
并得到这个错误信息
Undefined subroutine &mqin::
浏览 0提问于2012-07-03得票数 6
回答已采纳
1回答
我在R中做了一些分析，在这里我需要处理一些大型数据集(存储在.csv中的10-20GB，并使用read.csv函数)。
由于我还需要将大型.csv文件与其他数据帧合并和转换，所以我没有计算能力或内存来导入整个文件。
我想知道是否有人知道一种导入csv的随机百分比的方法。
我看到了一些例子，人们导入了整个文件，然后使用一个单独的函数来创建另一个数据框架，它是原始文件的一个示例，但是我希望得到一些不那么密集的东西。
浏览 2提问于2015-01-16得票数 4
回答已采纳
1回答
我有一个需要调用perl脚本的c#服务。现在，我的桌面上有perl脚本，只需引用桌面的完整路径。是否可以将perl脚本添加到c#项目中，并将其构建到与生成后生成的.exe相同的目录中？这样，就可以从当前路径引用文件。密码在下面。此外，perl脚本使用了我不想在脚本上使用的敏感信息，这样做的最佳方法是将敏感信息作为参数通过c#传递吗？
谢谢,
ProcessStartInfo perlStartInfo = new perlStartInfo perlStartInfo.RedirectStandardInput = true；perlStartInfo.UseShellExecute = fa
浏览 1提问于2013-11-24得票数 0
回答已采纳
3回答
我有数据，将每月添加，每个月我必须导入30多个XSLX！当我使用Navicat时，我必须设置从xslx列到mysql表列的关系，并且我重复地这样做！这是在浪费我的时间。我想知道我可以自动从xlsx导入到MYSQL，使用PHP或Navicat或其他可能的东西？请帮帮我。
解决方法:我正在使用SimpleXLSX，它更快更高效。非常推荐给大家！
浏览 4提问于2012-10-24得票数 0
1回答
您可以创建这样的perl oneliner：
perl -MIO -e 'some_perl_code'
有人能解释一下这个-MIO的意思吗？无法找到有关这方面的任何有用信息(在上有标志-I和-M，但这对我来说没有任何意义)。
浏览 0提问于2020-06-02得票数 1
回答已采纳
我有很多独立的剧本。他们唯一的共享之处就是使用了大量的CPAN模块(每个模块都导出了几个函数)。我想集中处理这个模块列表。我找到了几种方法。哪一个是最好的？
我可以创建导入所有内容的SharedModules.pm，然后手动将所有内容导出到main:：Exporter。
我可以创建以"package“开头的SharedModules.pm；因此它将直接导入main:：。好像很管用。这是不好的做法，为什么？
我可能需要()一个似乎将所有内容导入main:：sharedmodules.pl的。我不喜欢这个方法，因为require()在mod_perl下不太好用。
第二，
浏览 3提问于2011-02-07得票数 7
回答已采纳
摘要：
我使用html2ps来转换带有内联图像的html文档。(我安装了ImageMagick和libwww-perl。)如果图像是本地的，这很好；但是，当通过URL提供图像时，我只看到图像而不是我的图像。
我还尝试使用wget代替libwww-perl，结果完全相同。任何帮助都是非常感谢的。
代码：
我总是用
html2ps -d example.html > output.ps
我在两个地方有相同的图像文件：./local.png和。
以下html将图像插入到ps文档中：
<img src='local.png' />
但这一行只是插入单词图像
<
浏览 1提问于2015-05-07得票数 1
我想用system ($script)或do $script调用外部脚本。在我的@INC中，我有一些我导入的特定模块。如何调用$script并将其转换为相同的@INC
Script1.pm
#importing some libs
#code
$script = "path_to_script";
system ($script);
Script2.pm
use LibFromScript1@INC;
我得到了一个错误：
无法在@INC.
浏览 3提问于2016-09-19得票数 2
回答已采纳
2回答
无论出于什么原因，我的同事(可能是我过去)都导入了我们不会用到项目中的模块。这是如此糟糕，甚至不存在的模块正在被导入。
在Perl中，您可以这样说：
use Socket;
gethostname("DERP");
从该函数中很难看出它是否绑定到套接字模块。
是否有任何我不知道的程序或Perl的某些功能可以告诉您是否已将bloat导入到您的脚本中？
浏览 1提问于2017-10-24得票数 1
我正在学习SQL，并试图使用一些示例数据来理解各种概念。
下面是的前几行代码：
1 08bade48-1081-488f-b459-6c75d75312ae 2 2affa525151b6c51 79021a2e2c836c1a 327e089362aac70c fca90e7f73f3c8ef af26d27737af376a 100.0 2.0 0.0
29 08bade48-1081-488f-b459-6c75d75312ae 3 769ed4a87b5010f4 3d4b990abb0867c8 cd74a8342d25d090 ab9f74ae0
浏览 0提问于2015-01-17得票数 0
1回答
基本上，我在Ubuntu和OS上尝试过这个：
export PERL_LOCAL_LIB_ROOT=~/.perl5
wget -O- http://cpanmin.us | perl - -l ~/.perl5 App::cpanminus local::lib
eval `perl -I ~/.perl5/lib/perl5 -Mlocal::lib`
然而，第三行坚持用~/perl5而不是~/.perl5来创建和安装所有的东西。我怎样才能克服这种行为？
浏览 4提问于2016-04-27得票数 0
回答已采纳
3回答
我有以下perl一行程序将/path/to/file.txt转换为/path/to/
echo "/path/to/file.txt" | perl -pe 's{(.*)}{File::Basename->dirname($1)}ge'
但是，我在调用File::Basename->dirname()时遗漏了一些东西，导致了以下错误：
Can't locate object method "dirname" via package "File::Basename" (perhaps you forgot t
浏览 3提问于2016-11-20得票数 0
回答已采纳
在Solaris操作系统中有没有导入C库(.so)文件的函数？
在Windows中我可以使用，那Solaris呢？
谢谢。
浏览 0提问于2010-07-14得票数 0
回答已采纳
1回答
我正在使用Log4Perl模块进行日志记录。当我运行应用程序时，我在控制台上获得了一些Log4Perl模块日志：
Subroutine import redefined at C:/Strawberry/perl/site/lib/LOG/Log4perl.pm line 76.
Subroutine initialized redefined at C:/Strawberry/perl/site/lib/LOG/Log4perl.pm line 214.
Subroutine new redefined at C:/Strawberry/perl/site/lib/LOG/Log4perl.
浏览 1提问于2015-08-07得票数 0
回答已采纳
我正在尝试学习Perl，并了解一些关于use和模块的知识。
(假设为use strict; use warnings;)
我知道use File::Find;会加载模块的所有子例程。
我知道use File::Find qw(find);只加载模块的find子例程(尽管可以通过File::Find::finddepth使用其他子例程)。
那么File::Find ();做了什么呢？具体地说，为什么有空的括号？
浏览 2提问于2012-11-15得票数 5
回答已采纳
我正在考虑从tkinter开始学习Python来构建GUI。我在perl中有一些现成的库，我想从Python / tkinter GUI调用它们，以便相对快速地启动，而不是解决如何移植这些库。
在我开始之前，这是一个可行的项目吗？我可以很容易地从tkinter接口调用perl函数和程序吗？
谢谢
浏览 1提问于2013-06-04得票数 0
如果我使用第一个例子而不是第二个例子，我会得到什么？
package Some::Module;
use strict;
use 5.10.1;
use parent 'Exporter';
our @EXPORT_OK = qw(some_func);
package Some::Module;
use strict;
use 5.10.0;
use Exporter 'import';
our @EXPORT_OK = qw(some_func);
浏览 6提问于2013-12-24得票数 3
回答已采纳
我的csv文件(有3列)中有以下内容：
141413,"\"'/x=/></script></title><x><x/","Mountain View, CA\"'/x=/></script></title><x><x/"
148443,"CLICK LINK BELOW TO ENTER^^^^^^^^^^^^^^","model\
\
xxx lipsum as it is\
\
100 sometimes
浏览 0提问于2018-06-13得票数 1
1回答
我刚刚安装了模块以及所有依赖项(如 )。Crypt中有三个例程：：随机的，我不知道为什么perl会称它们为“未定义的子例程”。感谢知道出了什么问题的人。下面是例程(在模块中具体定义的)，我为它们选择了小参数以查看它们是否工作：
C:\Users\Jlinne\Documents>perl -MCrypt::Random -E "say makerandom(100)"
Undefined subroutine &main::makerandom called at -e line 1.
C:\Users\Jlinne\Documents>perl -MCr
浏览 5提问于2016-10-17得票数 0
回答已采纳
我在R中使用LibXML来解析XML文件。我可以在R中高效地解析文件。这样做之后，我面临的问题是这样的，我有两组XML文件，它们的结构如下：
<begin>
<sentence>
<text Blah Blah/>
</sentence>
</begin>
这是第一个文件。
第二个文件类似于：
<begin>
<sentence_additionalinfo>
<text Blah Blah/>
</sentence_additionalinfo>
</begin>
我想在&
浏览 2提问于2011-04-28得票数 1
回答已采纳
在我的项目中，我使用了 PHP类，它使用脚本将HTML文件转换为PDF文件。
最近，我将生产服务器升级到Debian 5 (Lenny)，之后，HTML_ToPDF不再工作了：
来自convert()类的HTML_ToPDF方法返回此错误：
Error: there was a problem running the html2ps command. Error code returned: 127. setDebug() for more information.
而且，html2ps调用的输出是：
/usr/bin/perl: symbol lookup error: /usr/lib
浏览 0提问于2009-04-17得票数 1
回答已采纳
这与我的上一个问题略有关联，因为我没有perl经验，但作为我的研究论文的一部分，我必须使用这个perl脚本(它不属于我)。我有问题，因为我似乎不能输出任何东西：
#!/usr/bin/perl -w
#
# seq.pl
# Script to see how random session ID are.
############################################
use Math::BigInt;
@seq = ();
@x = @y = @z = (;
while(<>) {
chomp($val = $_);
push(@seq, $val);
浏览 1提问于2014-01-30得票数 0
1回答
我刚刚编写了我的第一个Perl模块，在使用我生成的脚本时遇到了问题。下面是当我尝试运行使用新创建的模块的脚本时，Perl解释器显示的错误。
错误消息：
scraper_tools_v1.pm did not return a true value at getYid.pl line 5.
BEGIN failed--compilation aborted at getYid.pl line 5.
scraper_tools_v1.pm是我编写的Perl模块，getYid.pl是试图利用scraper_tools_v1.pm模块的Perl脚本。
以下是scraper_tools_v1.pm文件的
浏览 3提问于2010-12-29得票数 3
回答已采纳
2回答
我正在尝试将静态导航内容加载到我的网站的许多页面中。通常，我会使用PHP include或SSI。然而，我的大学网页服务器只允许在俱乐部服务器上使用这些方法(我也做俱乐部网站)。在个人页面服务器上，我们实际上只能访问Perl和Python (不能访问PHP、SSI或Ruby)。
所以我的问题是:有没有办法在没有PHP或SSI的情况下，允许我在多个页面上包含这些静态内容(比如导航栏和页脚，以便于维护)？
谢谢!
浏览 3提问于2011-05-02得票数 0
回答已采纳
我有一个sqlite数据库，我想从其中提取一列数据类型为BLOB的信息。我正在尝试这样做：
SELECT cast(data as TEXT) FROM content
这显然是行不通的。输出是乱码文本，如下所示：
x��Uak�0�>�8�0Ff;I�.��.i%�A��s�M
content列中的数据主要是文本，但也可能有图像(我认识到，如果我将其转换为文本，可能会导致问题)。我只是想将这些数据提取成一种可用的格式。有什么想法吗？
浏览 6提问于2013-01-21得票数 19
回答已采纳
认为要解决一个问题，这是最快的解决方案：
pipeline.)Write 在该文件上生成一个自定义的文件(这已经通过Perl完成)。通过脚本语言通过命令行打开XLS文档(客户端已经在此 VBA中运行了几个脚本，或者记录了一个执行以下OnLoad的宏：将数据从CSV文件导入到报告模板中，通过PDF驱动程序打印文件以固定位置，使用CSV中的数据来命名该文件。关闭XLS file.的
那么，这是可能的通过Excel宏，如果不是，它可以通过VBA --谢谢！
注意：似乎无论如何都要有一个MS的副本，所以这比使用(VSTO)要快得多。报表模板将位于服务器上，这样，最终用户就可以构建任意数量的报表，通
浏览 4提问于2010-12-16得票数 0
回答已采纳
1回答
我有OID：.1.3.6.1.2.1.25.3.3.1.2
我有24行(我有24个核心服务器)，
我想创建一个包含所有行的图，以查看利用率。
请帮帮我:)
谢谢..。
浏览 0提问于2011-08-09得票数 0
回答已采纳
1回答
我有一组4个perl文件。主文件调用其他三个文件为: system("perl file2.pl")；(所有文件都在同一个文件夹中)我必须从所有四个.pl文件创建一个exe文件，以便能够仅使用主脚本来调用其他三个文件。我曾尝试使用perl dev kit创建一个exe。但它仅在文件与exe位于同一目录下时才起作用。请建议一些方法，使一个独立的可执行文件，能够调用这3个文件。
*我不知道这是否重要，但所有的文件都有GUI。
浏览 2提问于2012-07-20得票数 3
回答已采纳
你能告诉我你是否知道一些实现这一目标的方法吗？我想删除所有的syscomments，但它似乎有更多的信息在那里。
在此之前非常感谢。
浏览 1提问于2010-11-05得票数 0
我有一个老的PHP应用程序，里面有一堆MySQL表。我想用Rails(3)重写它，并导入旧数据。如何编写迁移脚本将MySQL转储导入到sqlite DB中？
浏览 1提问于2010-09-01得票数 1
回答已采纳
1回答
我正在运行Ubuntuv14.04，经过一番努力，我成功地安装了Ubuntu。
我需要使用Perl + QML/Qt，通过Ubuntu开发(可能会有大量)功能齐全的应用程序，然后在桌面Ubuntu和Ubuntu电话平台上“转换”运行。Perl的Qt绑定已经过时，但我愿意自己重新实现更新的Qt绑定，以便在Perl以正常解释模式运行时使用。
https://metacpan.org/pod/QtCore4
另外，我将使用新的Perl编译器(我是作者)，因此我们可以生成直接调用Qt的C++输出代码，以便在Perl编译模式下运行时使用。
http://rperl.org
显然，如果我们在正常解释模式下
浏览 0提问于2016-08-09得票数 53
2回答
我有一个文件夹，比如myImages，其中包含许多图像。每个图像都被命名为IMG_**.JPG，其中**代表一个数字。我想将图像重命名为img_**.jpg。有没有一种快捷的方法可以做到这一点？或者我必须手动编辑每个图像的名称？
浏览 2提问于2014-04-23得票数 0
use Inline Python => <<'END';
from MYPYTHONLIBRARY import *
END
my $Obj = MYPYTHONLIBRARY->new($a, $b); # line 30
我得到的错误是:无法通过包"new“(perhaps you forgot to load "MYPYTHONLIBRARY "?) at /MY/LIBRARY/PATH/MYPERLLIBRARY.pm line 30找到对象方法"MYPYTHONLIBRARY”。
所以
浏览 1提问于2014-12-24得票数 0
有没有办法调用/访问同一文件中的其他cgi文件。例如:在PHP中，require或include可以调用其他php文件。类似的东西。我试图避免写出一个大文件，并试图在不同的文件中分离代码。
浏览 3提问于2015-02-24得票数 0
我想通过图像识别实现室内导航，使用Vuforia工具，它与Android协同工作。
我已经收集了我想要使用的图像，现在我成功地替换了ImageTargets应用程序的默认图片，以便添加我自己的图片。
我的问题是更进一步，因为当这个应用程序识别出一个博物馆的展品时，一个茶壶会被复制成一个茶壶，我想用箭头代替这个茶壶，这样可以帮助博物馆用户导航到博物馆。
我怎么能做到呢?有一篇文章在Vuforia的官方网站上，部分澄清了一定发生了什么，但它还远远不够全面()。
任何帮助对我来说都是至关重要的--谢谢
浏览 1提问于2013-09-22得票数 0
回答已采纳
我想知道如何使用bash命令/脚本删除文件中以特定扩展名结尾的、位于目录和(深度嵌套的)子目录中的特定代码行？
实际上，我想删除所有以import开头、以"(some file name here).scss"结尾的代码行
浏览 0提问于2018-07-18得票数 0
我正在尝试获取特定文件中图像的分辨率、宽度和高度。
我有以下代码。
#use strict;
use Image::Info qw(image_info dim);
use File::List;
#perl2exe_include Image::Info::JPEG;
#perl2exe_include PerlIO;
my $file = <ImageFilePath>;
my $info = image_info($file);
my $res = $info->{resolution};
p
浏览 0提问于2013-05-09得票数 0
我遇到了这个代码，但我不明白。
$type->isa('UNIVERSAL')
or eval "require $type"
or croak $@;
我已经引用了perldoc，并且我知道子例程isa()正在检查$type是否已被授予包UNIVERSAL。但是实际上，所有Perl类都是UNIVERSAL的子类，对吗？
我对or的两个术语感到困惑。它们是什么意思？
浏览 2提问于2013-05-22得票数 5
回答已采纳
我有一个关于如何自动将内容从.srt文件复制到.xls文件的问题。
我希望确保.srt文件中的内容可以粘贴到.xls的相应列中(例如，B列的超时；C列的超时；E列的副标题)。
为了避免手动复制和粘贴，有没有一种方法可以编写这个过程的脚本？有什么想法吗？
非常感谢您提前！:)
更新:我刚刚发现字幕编辑可以将.srt保存为csv，这将能够将文件更改为Excel文件。这很方便！但是还有另一个问题，我需要将内容从这个csv复制到另一个具有不同结构的Excel模板，所以我不能直接复制和粘贴csv中的值。我正在研究如何让这件事变得更容易。
现在不能发布图像，但是情况是，每次在srt转换的csv文件中的ti
浏览 12提问于2015-07-29得票数 0
我正在尝试将SVN存储库迁移到git。为此，我使用git-svn工具。我正在运行命令：git svn clone [SVN repo URL] --no-metadata -A authors-transform.txt --stdlayout ~/temp 我得到了以下错误： Name does not refer to a filesystem directory: Can’t get entries of non-directory at /Applications/Xcode.app/Contents/Developer/usr/share/git-core/perl/Git/SVN
浏览 30提问于2019-02-26得票数 3
1回答
我使用错误的格式使用Perl将大型阿拉伯数据库存储在Mysql中，这里发生的情况如下：
1)用属性创建的-Mysql表：
ENGINE=InnoDB DEFAULT CHARSET=utf8 COLLATE=utf8_general_ci
2)-My perl脚本是在utf8中创建的，我在顶部使用"use utf8;“。
3)-I可以从表中读取数据，并使用字符集utf8元标记以阿拉伯文显示在html页面上。
当我看到数据库中的数据被编码为不可读时，在搜索Perl模块DBI之后，我发现我应该这样做：
$dbh->{'mysql_enable_utf8'} = 1;
浏览 5提问于2014-12-23得票数 0
回答已采纳
我希望启用say特性(但也希望启用所有其他功能)。我知道，如果我在命令行上编写代码，我可以使用-E选项而不是-e。但如果我在运行脚本：
perl script.pl
我不能使用-E。我不想把use feature say放在脚本中；我想使用命令行选项。我能在这里使用什么样的选择？我一直无法从中看出这一点。
浏览 6提问于2014-02-01得票数 6
回答已采纳
如何在两个不同的perl脚本之间共享或导出全局变量。
情况是这样的：
first.pl
#!/usr/bin/perl
use strict;
our (@a, @b);
.........
second.pl
#!/usr/bin/perl
use strict;
require first.pl;
我想使用在first.pl中声明的全局变量(@a，@b
另外，假设第二个perl文件中有一个变量与第一个perl文件中的变量相同。但是我想使用第一个文件的变量。如何做到这一点？
浏览 91提问于2010-12-28得票数 28
1回答
我已经阅读并了解到，如果没有Perl解释器，就不可能解析Perl 5代码，因为有BEGIN块。
我知道有一些独立的解析器，比如 (由使用)，它们近似于解析初始文档。
但是，我找不到任何关于输出某种抽象语法树的过程的引用，也找不到与Perl在执行阶段使用的树类似的任何内部结构。
比较解析和执行阶段的内部表示以查看代码的展开和更改会很有趣。
浏览 0提问于2018-03-13得票数 10
回答已采纳
我们创建了1个perl脚本，它将从一个远程服务器运行并访问该服务器，并将通过为特定进程运行top命令来获取数据。但是，每当我尝试运行该脚本时，我都会遇到下面的错误。
我们创建的./script_GS.pl -bash: ./script_GS.pl: /usr/local/share/perl^M: bad interpreter: No such file or directory脚本如下。
#!/usr/bin/perl
use lib "/usr/CSV-2/lib";
use lib "/usr/share/lib";
use lib "/usr
浏览 3提问于2016-05-20得票数 0
为什么在我添加了use strict; use warnings;之后我的代码就不能工作了？有没有办法让它工作呢？
以前的工作代码是：
#!/usr/bin/perl -s
print "x: $x\n";
print "y: $y\n";
我运行的命令是perl -s test.pl -x="hello" -y="world"。输出为：
x: hello
y: world
然而，在我添加了use strict; use warnings;之后，我得到了以下错误：
Variable "$x" is not impo
浏览 1提问于2012-03-07得票数 7
回答已采纳
我有一个一般性的问题:下面的代码有什么区别？
代码1：
BEGIN {
push @INC,"/usr/local/bin/";
}
require "package.pl";
代码2：
require "/usr/local/bin/package.pl";
哪一个更好？
浏览 1提问于2015-03-09得票数 0
基本上我的问题类似于，但是来自PNG而不是JPEG。
更具体地说，我有一堆连接在一起的PNG图像，我想知道它们的长度，这样我就可以将流分割成与单个图像相对应的片段。
我不需要对图像进行解码或验证。我可以假设输入流由有效的PNG图像组成，并且不想验证这一点。相反，对我来说，尽可能快地完成这项工作是有用的，因此所需的解码操作量越少越好。
浏览 1提问于2015-01-29得票数 0
1回答
在包中引用主变量
、、
我想创建一个带有方法A()、B()和C()的库，它们将在每个perl程序中以不同的字符串作为参数被调用数百次。每个方法都更新它各自的数组(@A、@B和@C)，所以我不想每次都通过引用传递数组。每个perl程序还会将一些唯一的字符串添加到数组中，因此我不能创建数组，而只能由包修改数组。 有没有可能在包中操作主程序中的共享数组，而不必通过子例程传递它？有没有办法设置别名数组或数组指针来引用main中的数组？ main.pl use MyPackage;
our @a; MyPackage.pm package MyPackage;
$alias_a = @main::a;
push @alias
浏览 14提问于2020-06-18得票数 2
回答已采纳
扫码
添加站长 进交流群
领取专属 10元无门槛券
手把手带您无忧上云
相关资讯
热门标签
云服务器
ICP备案
实时音视频
对象存储
即时通信 IM活动推荐
腾讯云开发者
