对此可能有一个简单的解决方案,但我无法弄清楚.我期待:
注意:它只是设置$variable为" N/A",我无法工作.
例如:
foreach $var (@list) {
($name,$date,$size, etc...)=split(/,\"/,$var);
}
如果数组中的字段为空,我将如何设置$date为" N/A"？
所以产生:
$name = Jim
$date = N/A
$size = small
我希望这很有意义并且易于修复.-谢谢
我想知道Perl对基于OOP的编程有多好.使用Perl进行OOP有哪些优点和缺点,如果有缺点,是否存在编写代码的反向编码方法？任何有关Perl现在使用的信息 - 以及Perl程序员未来的支付情况 - 也将受到赞赏.
我想接受这个
Code:
2010-12-21 20:00:00
并使它看起来像这样:
Code:
20101221200000
这是我尝试过的最后一件事
Code:
#!/usr/bin/perl -w
use strict;
my ($teststring) = '2010-12-21 20:00:00';
my $result = " ";
print "$teststring\n";
$teststring =~ "/(d\{4\})(d\{3\})(d\{3\})(d\{3\})(d\{3\})(d\{3\})/$result";
{
print "$_\n";
print "$result\n";
print "$teststring\n";
}
它产生了这个:
Code:
nathan@debian:~/Desktop$ ./ptest
2010-12-21 20:00:00
Use of uninitialized value $_ in concatenation (.) or string at ./ptest line 8.
2010-12-21 20:00:00
nathan@debian:~/Desktop$
-谢谢
我有一个数组...让我们说100个元素.我想检查是否有任何元素与特定字符串匹配.例如:
@array =('red','white','blue');
我还想知道数组是否包含字符串'white'作为其中一个元素. 我知道如何使用foreach循环并比较每个元素,但是......是否有比循环整个数组更简单(更快)的方法？
-谢谢
我将如何对以下方法的算法进行伪编码:
滚动一种模具 - 4,6,8,10或12面
可以卷起这种类型的十个模具
如果超过一半的骰子是1,则打印出一条消息,表明它们已经破坏并结束程序
如果任何模具等于模具的模具类型,则从组中取出最高值.以及重新轧制的模具等于模具轧制类型的价值.
^^^^ IE - 让我们说你有3个六面模具,你滚动它们你得到4,2和6.你取6的值,因为它是最高的.然后你重新滚动六个模具.如果你得到6,那么你将六个加到前六个并重新滚动.如果不是,您只需将最高模具添加到之前的值.