为什么我的方法打印"isObjectName = SCALAR(0x1289df0)"？
这个问题的答案可能与您在代码中使用的某个方法有关。在编程中，当您尝试打印一个对象时，通常会显示对象的内存地址或其他标识符。在这个例子中，"isObjectName = SCALAR(0x1289df0)" 表示您正在打印一个名为 "isObjectName" 的对象，其内存地址为 0x1289df0。
要解决这个问题，您需要检查您的代码以确定为什么 "isObjectName" 对象被打印出来。您可以尝试查找您的代码中是否有类似于 console.log(isObjectName) 或 print(isObjectName) 的语句，并检查它们是否在您期望的位置执行。如果您无法找到原因，请提供更多关于您的代码和使用的编程语言的信息，以便我们能够更好地帮助您解决问题。
相关·内容
1回答
my $doc = $parser->parse_string( $res->content );
my $root = $doc->getDocumentElement;
my @objects = $root->getElementsByTagName('OBJECT');
foreach my $object ( @objects ){
my $name = $object->firstChild;
print "OBJECT = " . $name . "\n";}
OUTPUT is:
OBJECT
浏览 4提问于2016-01-20得票数 1
回答已采纳
是Perl面向对象编程的新手，我有一个简短的问题。我在一个类中有这个函数：
sub Print{
my $text = shift;
print "my text is", $text;
}
我尝试通过执行以下操作来打印文本：
my $object = ObjectName->new();
$object->Print("Print this text")
它打印以下内容：
my text isObjectName=SCALAR(0x1289df0)
我的问题是，它为什么要这样做，我如何让它简单地打印出我作为参数传递的文本？
浏览 0提问于2009-11-29得票数 2
回答已采纳
4回答
我在O‘’Reilly的书中发现了一个有点奇怪的例子：
@backwards = reverse qw/ yabba dabba doo /;
print "list context: @backwards\n";
$backward = reverse qw/ yabba dabba doo /;
print "scalar1 context: $backward\n";
$notbackward = qw/ yabba dabba doo /;
print "scalar2 context: $notbackward\n";
print &#
浏览 1提问于2011-03-03得票数 3
回答已采纳
2回答
下面的脚本将打印每个键的每个元素的所有标量值，如何仅打印散列中每个元素的第一个标量值。
#!/usr/bin/perl
use warnings;
use strict;
use Tie::IxHash;
my %KEY_VALUE;
tie %KEY_VALUE,'Tie::IxHash';
my %KEY_VALUE= (
0 => ['A','A','C','B','D'],
1 => ['C','C','C&#
浏览 2提问于2018-10-13得票数 0
1回答
我正在处理sqlalchemy返回子句，请考虑以下代码
stmt = insert(A).values({"data": "data", "id":2}).returning(A)
result = await session.execute(stmt)
print(type(result.scalar()))
输出只是打印一个整数。
但是，如果我使用select语句而不是返回，它会给出映射的行对象吗？
stmt = select(A).where(A.id == 2)
result = await session.execute(stmt)
p
浏览 3提问于2022-04-25得票数 2
2回答
我在这里有一些价值观。打印数组可以很好地显示值。然而，执行Json泡菜显示了一些关于numpy和py/tuple项的内容。不知道原因，并试图cleare缓存和重建。这并没有解决这个问题。有人知道为什么会发生这种事吗？我的其他数组都用json泡菜打印很好。
似乎我指的是一些记忆，而不是价值观。
print(test)
[104.97287576678693, 99.802264802045, 115.59585412670378, 103.42889046311696, 116.20011484134734]
print(jsonpickle.encode(test))
[{"py/
浏览 5提问于2021-03-29得票数 0
回答已采纳
当我从excel文件中提取文本时，它以Win32::OLE::Variant=SCALAR(0x1214f94)的形式出现。如何将其转换为Perl变量？当我尝试使用值函数时，只需打印@data = @{$dataHash{$header}};
my ($refs,$rows,$header) = &extract;
my %dataHash = %{$refs};
print "Keys:",keys %dataHash,"\n";
my @headers = @{$header};
my @test = @{$dataHash{'Date
浏览 5提问于2011-08-11得票数 0
我知道Execute Reader和Execute Scalar的目的。但Execute Reader可以服务于Execute Scalar的目的。那么为什么要使用Execute Scalar呢？它们之间有性能上的差异吗？哪个更快？
谢谢。
浏览 4提问于2017-09-28得票数 0
想着下一个。有一份清单
qw(a b c);
现在，将列表分配给匿名(匿名)数组。
[ qw(a b c) ]
所以下一个
use 5.016;
use warnings;
use diagnostics;
my $x = [ qw(a b c) ];
say ref $x; #ARRAY - the $x is an ARRAY reference, and
say $x->[1]; #prints "b", and
say [ qw(a b c) ]->[1]; #works too
但现在会发生什么呢？
use 5.016;
use warnings
浏览 1提问于2013-05-13得票数 6
回答已采纳
下面的Perl代码将打印一个"1"，但是函数test2实际上没有合法的输入值。为什么Perl会这样做呢？
test();
sub test {
my ($var) = @_;
test2($var);
}
sub test2 {
my (@array) = @_;
print scalar @array;
}
浏览 1提问于2015-09-08得票数 2
回答已采纳
我正在尝试使用Net:: CUPS ->getDestinations()来获取CUPS中配置的打印机名称列表。
Ubuntu服务器14.04.3
杯1.7.2
Perl 5.18.2
净额:CUPS 0.61
这样的一个简短的演示程序
#!/usr/bin/perl
use strict;
use warnings;
use Net::CUPS;
my $cups = Net::CUPS->new();
my @prts = $cups->getDestinations();
foreach my $printer (@prts) {
print
浏览 2提问于2015-12-07得票数 1
回答已采纳
例如，我的XML代码是：
<part>
<name>qwe</name>
<ir>
<d>yes</d>
<scalar>
<left>31</left>
<right>0</right>
</scalar>
</ir>
</part>
<part>
浏览 0提问于2012-10-25得票数 2
回答已采纳
拥有以下bash脚本：
future="${1:-Dec 08 2017 22:00:00}"
t1=$(date -j -f "%b %d %Y %H:%M:%S" "$future" +%s) #using OS X
t0=$(date +%s)
echo "Current: $(date)"
echo "Future : $future"
echo "Diff : $(( $t1 - $t0 )) secs"
它打印：
Current: pi 8. december 2017 21
浏览 0提问于2017-12-08得票数 3
回答已采纳
我想以格式化的方式打印numpy.timedelta64()值。直接法效果很好：
>>> import numpy as np
>>> print np.timedelta64(10,'m')
10 minutes
我猜它来自于__str__()方法
>>> np.timedelta64(10,'m').__str__()
'10 minutes'
但是，当我尝试用format()函数打印它时，我会得到以下错误：
>>> print "my delta is : {d
浏览 5提问于2014-09-25得票数 2
回答已采纳
因此，我有两个包含相似信息的文件。
示例
test.txt
1=1
2=2
3=3
test_2.txt
1=1
2=4
3=5
4=4
5=5
6=6
现在，我想打印每个散列、键和值。
my %hash1;
my $scalar_value1;
my $scalar_value2;
my $file = "/test/test.txt";
open (TEST, "<$file") or die "$!";
while (TEST) {
($scalar_value1, $scalar_va
浏览 3提问于2010-11-02得票数 0
2回答
$tally['zero']['status']='hello';
echo $tally['zero']['status'];
//prints hello, this is expected
在本例中，为什么只打印第一个字母？
$tally = array( "zero" => '0');
$tally['zero']['status']='hello';
echo $tally['zero'][&#
浏览 1提问于2012-05-06得票数 1
回答已采纳
我正在尝试让我的__index方法在任何时候从这个表中读取一个键，但是它显然不会触发，因为A)读取的内容从未按照其预期的数学进行修改，而B)它的打印语句从未触发。我少了什么拜托？
local scalar = 2
local scalar_template = {
__index = function(t, k)
print('hi?') --never fires
return rawget(t,k) * scalar
end
}
local m = {}
m.scalars = setmetatable({width = 2, heig
浏览 4提问于2022-08-11得票数 1
回答已采纳
所以我在本地机器上运行了这个命令。由于明显的原因，擦洗链接。
scalar clone --full-clone https://$env:USERNAME:$env:PAT_TOKEN@<MY GIT REPO LINK HERE>
但是运行这个文件在dockerfile中不起作用。即使在构建过程中通过了ARG。是的，我已经把它们打印出来了。
RUN scalar clone --full-clone https://$env:USERNAME:$env:PAT_TOKEN@<MY GIT REPO LINK HERE>
但如果我在正确的地方加一个反斜杠就行了.
RU
浏览 2提问于2020-09-28得票数 1
回答已采纳
我使用进行验证，但是在回调部分，而不是定义直接匿名函数，如果我尝试提供对该匿名函数的引用，它将直接跳转到错误日志记录区域，而不会在块内打印消息(如果传递正确的值)。
use Params::Validate qw(:all);
our $attributeCallback = sub {
my $parameter = shift;
$parameter =~ m/^\w+$/i ;
};
sub getSingleValue {
eval {
my ($domainName, $attribute) = validate_pos( @_,
浏览 3提问于2010-02-11得票数 1
回答已采纳
我在perl中使用Win32::OLE::Const->Load()：
$xl = Win32::OLE::Const->Load('Microsoft Excel');
然后我测试scalar(keys %{$xl})是否为零：
if (scalar(keys %{$xl})==0) {
return False;
}
else {
return True;
}
我在支持Microsoft 2003的机器上测试了这段代码，它给了True，但是当我在有Microsoft 2013的机器上测试相同的代码时，它给
浏览 4提问于2020-03-19得票数 0
回答已采纳
1回答
我试图用解析以下XML数据
<xml>
<a>
<b>1</b>
<b>2</b>
<c>
<b>3</b>
</c>
</a>
<a>
<b>4</b>
<c>
<b>5</b>
<b>6</b>
</c>
<c>
<
浏览 0提问于2018-08-08得票数 0
1回答
我有4个文件，每个文件我读入它自己的数组。然后，我将文件A、B和C彼此进行比较。在每一步中，我都会打印出一个缺失的数字列表。
将A与B进行比较，然后将B与A进行比较，打印在A而不是B中找到的文件列表，反之亦然
将A与C进行比较，然后将C与A进行比较，打印在A中找到但不在C中找到的文件列表，反之亦然
将B与C进行比较，将C与B进行比较。打印在B中找到但不在C中找到的文件列表，反之亦然
然后，我必须从这些比较中获取值，并将它们与文件D进行比较，仅打印在文件D中找不到的文件
这是我到目前为止拥有的代码。我只是认为可以有更好的方法来做这件事，我希望在这方面得到一些帮助。
代码
sub compare
浏览 0提问于2013-04-02得票数 0
回答已采纳
5回答
我对Python还比较陌生，很难将语言的特性与我在C++和Java背景中学到的习惯结合起来。
我最近的问题与封装有关，特别是一个由Meyer的“有效C++”第23项概括的想法：
.
忽略缺少friend机制，是否也被认为比中的成员函数更可取？
强制性的，无意义的例子：
class Vector(object):
def __init__(self, dX, dY):
self.dX = dX
self.dY = dY
def __str__(self):
return "->(" + str(self.
浏览 13提问于2012-04-09得票数 19
回答已采纳
我对Perl很陌生。我发现以下代码无法运行：
#! perl -T
use strict;
use warnings;
BEGIN {
my @classes = qw(Animal Cow Sheep Horse Mouse);
use Test::More tests => scalar @classes;
}
如果我将scalar @classes改为5，就可以了。如果我将use Test::More tests => scalar @classes;改为print scalar @classes;，就可以了。但是当他们在一起的时候，他们就错了。为什么？
浏览 2提问于2016-04-05得票数 3
回答已采纳
在OpenCV教程中
是以下创建Mat的示例。
int sz[3] = {2,2,2};
Mat L(3,sz, CV_8UC(1), Scalar::all(0));
这很好，但是当我试图打印我的程序时，我会崩溃。
cout << "L = " << endl << " " << L << endl << endl;
为什么这个不行？有没有办法做到这一点，没有循环或分裂的马特L？
浏览 0提问于2017-10-04得票数 0
回答已采纳
我有一些代码，比如：
my %hosts = (
'USAmazon' => ['US','CA'],
'EUAmazon' => ['GB', 'FR', 'IT', 'ES', 'DE'],
'CNAmazon' => ['CN'],
'JPAmazon' => ['JP'],
);
my @values = $hosts{$A
浏览 0提问于2012-12-06得票数 0
回答已采纳
我的perl脚本接受任意数量的文件，打开它们，并从每一行读取一行。但这不管用。这是我的密码。
#!/bin/perl
$numfile = scalar @ARGV;
for ($i = 0; $i < $numfile; ++$i)
{
open $fh[$i],"<",$ARGV[$i];
$line[$i] = <$fh[$i]>;
}
for ($i = 0; $i < $numfile; ++$i)
{
print "$i => $line[$i]";
}
知道为什么这不管用吗？在
浏览 0提问于2014-06-27得票数 2
回答已采纳
我有一个CUDA内核模板功能如下：
template <typename scalar_t, typename accscalar_t, typename index_type, int indexing_kind>
__global__ void lstm_cell_forward(
TensorInfo<scalar_t, index_type> input,
TensorInfo<scalar_t, index_type> hidden,
T
浏览 8提问于2021-08-13得票数 1
回答已采纳
有人能给我解释一下为什么只打印这个数组的第一项吗？
print "Hello World!\n";
@array1 = ("john","haider","elley","uul");
@array2 = qw/This is an array/;
$array_size=scalar @array1;
print "Size: ",$array_size,"\n";
$i;
for($i=0; $i<=$ar
浏览 0提问于2016-11-26得票数 0
我收到以下警告，但未提及正在发生的情况：
warning: integer overflows when converted from 'Builtin.Int32' to 'Builtin.Int8'
此代码中出现了警告：
extension NSPoint {
func ToString() -> String {
return "(" + self.x.description + "," + self.y.description + ")"
}
func Plus(toBeAdded : N
浏览 3提问于2014-09-16得票数 3
回答已采纳
我的XML看起来像这样：(很抱歉，如果有重复的问题，但我对XML不是很有经验，所以我在术语上有点问题
<sometags>
<Value>
<Scalar unitGlobalDataRef="Unit_0" unit="None" xmlns="xxxxyyyy">20</Scalar>
</Value>
</sometags>
使用以下代码：
element = ET.parse(fileName)
root = element.getr
浏览 0提问于2012-07-19得票数 0
回答已采纳
1回答
swift无法在终端中打印
、、、、
在我的终端(Zsh)中，此代码不打印任何内容 import Foundation
while (true){
print(".", terminator: "")
sleep(1)
print(String(Character(Unicode.Scalar(8))), terminator: "")
}
浏览 46提问于2021-08-07得票数 1
回答已采纳
3回答
Perl:匿名列表的长度
、、、
如何获取匿名名单的长度？
perl -E 'say scalar ("a", "b");' # => b
我期望scalar在标量上下文中返回列表的长度。
为什么它返回第二个(最后)元素？
它适用于数组：
perl -E 'my @lst = ("a", "b"); say scalar @lst;' # => 2
浏览 0提问于2019-08-03得票数 3
回答已采纳
1回答
这是我第一次使用Perl。
在Perl线程中，如果上下文是标量的话，threads->exit()子例程的返回值是undef值。
#!/usr/bin/perl
use threads;
$t=threads->create({"context"=>"scalar"},
sub { threads->exit();});
$re = $t->join();
print "##################\n";
print "$re\n\n";
print
浏览 1提问于2013-10-02得票数 1
回答已采纳
我想按列名读取Stata矩阵元素，以便在运行回归之后循环使用varlist。
在下面的代码中，它有时工作，但不是一直工作。我也搞不懂为什么。
sysuse auto, clear
scalar drop _all
matrix drop _all
regress price weight headroom trunk
matrix b = e(b)
local colnames : colnames b
foreach v of local colnames {
if ("`v'" != "_cons") {
display &
浏览 4提问于2016-08-23得票数 0
回答已采纳
4回答
是否可以强制不同的perl散列键映射到相同的值？例如：
my %h = (
aaa => 'val_1',
bbb => 'val_2',
);
print "==============\n";
&dump();
$h{bbb} = \$h{aaa};
&dump();
$h{aaa} = 'new';
&dump();
sub dump{
foreach my $k ( sort keys %h ){
print "$k =>
浏览 0提问于2013-01-16得票数 0
2回答
我有一个散列，我想要按升序对键进行数字排序，并按字母升序对其值进行排序。
#!/usr/bin/perl
use warnings;
use strict;
use List::MoreUtils;
use Tie::IxHash;
my %KEY_VALUE;
#tie %KEY_VALUE,'Tie::IxHash';
my %KEY_VALUE= (
0 => [ 'A', 'C', 'B', 'A' ,'D'],
5 => [ 'D'
浏览 2提问于2018-10-12得票数 0
3回答
我有以下问题:来自具有下列格式化数据的文件(file.dat)
1 2 3 4
2 1 3 4 5
3 1 2
4 1 2
5 2 6 7
6 5 8
7 5 8
8 6 7 9
9 8
我想找到：
如果某一行的第一个元素出现在其他行中，而后续行的第一个元素出现在在检查中的行中；
如果它存在，那么我想打印“我找到了链接x”；
如果“链接”存在，那么我想数一数考试中所选行中的其他元素出现在链接所在的行中的次数，并打印“我找到了z三角形”。
例如，在这种情况下，当程序比较第一行和第二行时，发现“link 12”存在，然后写上"I‘second 2个三角形“(因为在每一行
浏览 2提问于2013-03-04得票数 0
回答已采纳
我正在打印Tensorflow的向量和矩阵。它打印scalar，但显示vector、Matrix和Tensor的错误
代码如下：
import tensorflow as tf
scalar = tf.constant([2])
vector = tf.constant([3,4,5])
Matrix = tf.constant([1,2,3],[4,5,6],[7,8,9])
Tensor = tf.constant([ [[1,2,3],[4,5,6],[7,8,9]],
[[1,2,3],[4,5,6],[7,8,9]],
浏览 0提问于2017-12-06得票数 2
回答已采纳
5回答
可能复制：
我有一个函数或子例程，它接受第一个参数作为数组，第二个参数作为标量。例如,
sub calc {
my @array = $_[0];
my $scalar = $_[1];
print @array, $scalar;
}
问题是，函数使数组等于传入的数组的第一个值，而标量是数组传入的第二个值。当我希望第一个数组是整个数组时，我不需要对数组进行深度复制。例如,
my @array = ('51', 'M');
my $scalar = 21;
和
calc(@array, $scalar)
当我想要51 M的时候会
浏览 0提问于2012-05-23得票数 37
回答已采纳
2回答
我对Perl很陌生。我试图识别如何打印数组的散列大小。下面是我的代码片段。
my %map = (); // Initialization
while ($line = <>) {
chomp($line);
// Logic to split the $line
push( @{$map{$first_var}}, $rest );
}
// Print the amp
foreach my $value (sort keys %map) {
print "$value: @{$map{$value}}\n"
浏览 6提问于2016-03-02得票数 0
回答已采纳
f = h5.File("image_data.h5", 'w')
f["horizontal_min"] = horizontal_min,
f["horizontal_max"] = horizontal_max,
f["vertical_min"] = vertical_min,
f["vertical_max"] = vertical_max,
结果：
horizontal_max Dataset {1}
horizontal_min Da
浏览 2提问于2020-01-13得票数 0
回答已采纳
1回答
我有一个哈希数组，哈希值之一是数组。->我将"@ title“推送到"part”，对于打印，->将每本书{part}放在一个临时数组中，以访问标题的每个元素，但它只是打印第一个元素，我不能访问数组“book”中的所有"title“元素。
@books = ();
@title = (1,2,3,4,5);
push @books,{subject=>"hello" , part =>@title };
for($i=0;$i<scalar(@books);++$i)
{
print $books[$i]{subjec
浏览 0提问于2016-08-01得票数 1
回答已采纳
我的理解是，在下面的代码中，我不需要使用(2)，只要(1)就足以在自己的行中打印数组的每个元素。
$ cat test-hash.raku
use v6;
my %h;
say ""
浏览 8提问于2022-10-20得票数 3
回答已采纳
3回答
如果在包含查询字符串的简单条件之后，将所有匹配字符串存储在Perl中的数组中似乎无法正常工作。有人知道这是为什么吗？下面有一些代码说明了这一点：
#!/usr/local/bin/perl -w
use warnings;
use strict;
my ($string,
@instance_array,
);
$string = 'ABCDCECFCG';
print "String: $string\n\n";
# PRINT INSTANCE ARRAY BEFORE CONDITIONAL
@instance_ar
浏览 2提问于2016-10-20得票数 2
回答已采纳
我有以下三项任务，其中第二项似乎不符合标准：
my $realRef = [1, 2, 3];
my @nonRef = [4, 5, 6];
my $nonRef = [7, 8, 9];
第二个问题实际上应该是以下几点：
my @nonRef = (4, 5, 6);
在打印时，所有三个变量都包含数组引用，特别是仅在@和$中不同的相同命名变量不共享相同的数据或覆盖彼此。
Ref: ARRAY(0x1fd6a8); $VAR1 = [
1,
2,
3
];
Ref: ARRAY(0x6445d8); $VAR1
浏览 4提问于2020-07-09得票数 2
回答已采纳
请参阅以下代码：
$scalar = 10;
subroutine(\$scalar);
sub subroutine {
my $subroutine_scalar = ${$_[0]}; #note you need the {} brackets, or this doesn't work!
print "$subroutine_scalar\n";
}
在上面的代码中，您可以看到写着“注意，您需要{}括号，否则不工作！”的注释。请解释为什么我们不能使用与以下相同的语句：
my $subroutine_scalar = $$_[0];
也就是说
浏览 3提问于2013-10-18得票数 7
回答已采纳
下面是我在命令行输入的FASTA文件中搜索用户提供的motif的代码。当我运行它并输入一个我知道在文件中的motif时，它返回'Motif not found‘。我只是Perl的初学者，我不知道如何打印motif found，更不用说返回标题行了。如果您能帮助我解决这个问题，我将不胜感激。
谢谢。
use warnings;
use strict;
my $motif;
my $filename;
my @seq;
#my $motif_found;
my $scalar;
$filename = $ARGV[0];
open (DNAFILE,$fi
浏览 1提问于2010-12-01得票数 3
3回答
有两个声明的变量，我想同时计算这两个变量是否都存在(为真)。
my @array = (1,2);
my $scalar = 0;
if (@array && $scalar){
print "success\n";
}
&&不工作。有没有另外一个运算符，或者我必须创建2个if-state？
我希望它能打印出success。
浏览 1提问于2013-05-16得票数 0
回答已采纳
1回答
我有一个OpenCV程序，它使用SURF来检测是否在视频流中检测到模板对象。当检测到对象时，我希望打印出该对象的名称，但现在，每当发现“良好”功能匹配时，它似乎都在打印，而在大多数情况下，这是假阳性。
我的计划如下：
//Step 1: Detect keypoints using SURF detector
//Step 2: Calculate descriptors (feature vectors)
//Step 3: Matching descriptor vectors using FLANN matcher
//Step 4: Localise t
浏览 1提问于2015-01-28得票数 1
回答已采纳
扫码
添加站长 进交流群
领取专属 10元无门槛券
手把手带您无忧上云
相关资讯
热门标签
云服务器
ICP备案
对象存储
实时音视频
即时通信 IM活动推荐
腾讯云开发者
