从套接字接收的数据($ data)包含4个字节的长度数据+ json数据。我想修剪长度，只解析json。 我已经完成了代码，它工作得很好。但我想知道是否有更有效的方法(算法)。在perl中，有没有一种将数组转移到变量的有效方法？@tmpp = split(//,$data); #data = socket data
my $t1 = sprintf("%02x%02x%02x%02x",ord($tmpp[0]),ord($
浏览 20提问于2019-02-07得票数 3
回答已采纳
2回答
我需要将散列引用的数组传递给php，以便php可以使用这些数据。我正在使用PHP::Serialize模块序列化散列引用的perl数组，并将其存储到数据库中。/usr/local/bin/perlmy @rss_feed_result = ({php
.....read data from database into $pe
浏览 0提问于2014-02-24得票数 0
2回答
因此，所需的输出如下所示：Pf1 Pf3 B1Pf5 Pf6 D3我脑海中的热点是：
如何将第一列的元素与其他列的元素关联(可能是键)？
浏览 3提问于2013-08-01得票数 1
回答已采纳
我正在尝试运行一个perl脚本，我得到了这个错误：
Can't locate loadable object for module Data::UUID in @INC (@INC contains:/usr/local/lib/perl5/site_perl/5.10.0/i386-linux-thread-multi /usr/local/lib/perl5/site_<e
浏览 5提问于2011-04-20得票数 0
如何将变量从一个perl网页传递到下一个perl网页，下面是我的示例：<a href="Month_entries.pl?month='$data[2]'&user='$data[0]' onclick=&q
浏览 0提问于2012-12-10得票数 0
回答已采纳
2回答
use LWP::UserAgent;use threads::shared;my %thread_data:shared = ();
$thread_data{1}=['a','b']; #This line gives me an error
浏览 2提问于2014-08-25得票数 1
当您转储数组时：@arr=('a','b','c');你会得到这样的东西：$VAR2 = 'b';有可能得到这样的东西：$VAR1 = 'b';编辑：<em
浏览 2提问于2013-10-14得票数 2
回答已采纳
下面是代码，我知道它不是完美的perl。如果你有关于我如何做得更好的见解，请让我知道。我的主要问题是如何在不使用Data::Dumper的情况下打印出数组？use Data::Dumper qw(Dumper);
use warnings;
open(MYFILE, "<", "move_headers.txt
浏览 0提问于2012-01-05得票数 2
回答已采纳
2回答
这个XML的一个子集似乎是由XML::Simple放入数组中的。当运行数据是我解析的Dumper($data)时，相关小节如下所示。, 'AudioFormat' => 'MXF' ]; `my @audiostuff = $data->{ClipContent}-
浏览 4提问于2012-10-05得票数 3
回答已采纳
我有三个数组。我想通过在for循环中更改数组名称来访问这三个数组的元素。 #!/usr/bin/perl @data_1 = (10,20,30,40,50);
@data_2 = ('a','b','c','d&#x
浏览 9提问于2019-08-17得票数 1
回答已采纳
1回答
use strict;use JSON;my %perl_data;
$perl_data{nodes} = [{id => "", x => ".." , y => ".." , size => ".."}];
$perl_d
浏览 9提问于2019-05-03得票数 0
回答已采纳
4回答
$perl_scalar = decode_json( encode ('utf8',$line));此引用由一个散列数组组成。我想要得到散列的数量。如果我做长度($perl_scalar)，我得到的一些数字与数组中的元素数不匹配。
浏览 1提问于2011-05-04得票数 18
回答已采纳
4回答
我有一个数据集中在一个文件组织成块some datamore data----------------------- BLOCK two ----another datasome datamore data
-
浏览 0提问于2022-03-08得票数 0
回答已采纳
下面是我通常要做的：$result = $1;
我希望将$result设置为与正则表达式相同的行，并且从不使用$1。谢谢！
浏览 4提问于2013-05-29得票数 1
回答已采纳
5回答
my @col; @x = split(' ',$_); #print "$x[0]\n"; Thisis working but i'm not expect this.} __DATA__
7 2 3
浏览 6提问于2015-01-01得票数 1
回答已采纳
2回答
相关代码： $exists = $this->exists( $data['brand'] )$exists )
return ! $exists ?
浏览 0提问于2013-03-27得票数 1
回答已采纳
4回答
我想知道是否有人可以帮助一个绝望的perl新手回答以下问题。我已经尝试了一整天，但我的perl书在工作中，我似乎不能在google...or中找到任何相关的东西，也许我真的很愚蠢。我试着把它变成一个哈希表，但它当然不会让我有重复的，所以我想我想要为每个名字(在这个例子中，是Bob，Mary和Robin)使用数组。我不敢上传我一直在尝试调整的代码，因为我知道它会大错特错。数组。这是正确的吗？感谢您的时间，耐心和帮助。
#!/usr
浏览 0提问于2012-04-14得票数 2
回答已采纳
云服务器
ICP备案
对象存储
腾讯会议
云直播
腾讯云开发者
