Warning: file_get_contents(/data/phpspider/zhask/data//catemap/8/perl/10.json): failed to open stream: No such file or directory in /data/phpspider/zhask/libs/function.php on line 167

Warning: Invalid argument supplied for foreach() in /data/phpspider/zhask/libs/tag.function.php on line 1116

Notice: Undefined index: in /data/phpspider/zhask/libs/function.php on line 180

Warning: array_chunk() expects parameter 1 to be array, null given in /data/phpspider/zhask/libs/function.php on line 181
用Perl编写Ruby脚本_Perl - Fatal编程技术网

用Perl编写Ruby脚本

用Perl编写Ruby脚本,perl,Perl,我正在用三种不同的语言编写一个简单的脚本:Python、Ruby和Perl。我对Perl非常陌生,但我真的很想学习它。我的问题是,我不知道如何像Ruby那样用Perl编写方法。我很确定方法在Perl中被称为函数,但我不确定 以下是我用三种语言写的内容: Ruby(到目前为止我所拥有的) 正如您所看到的,这是一个非常简单的脚本,我只是觉得用三种不同的语言编写它将帮助我选择下一步要学习的语言(我已经知道Ruby) 有人能给我解释一下如何用Perl编写一个方法吗?我已经在谷歌上搜索过了,但我似乎无法用

我正在用三种不同的语言编写一个简单的脚本:Python、Ruby和Perl。我对Perl非常陌生,但我真的很想学习它。我的问题是,我不知道如何像Ruby那样用Perl编写方法。我很确定方法在Perl中被称为函数,但我不确定

以下是我用三种语言写的内容: Ruby(到目前为止我所拥有的)

正如您所看到的,这是一个非常简单的脚本,我只是觉得用三种不同的语言编写它将帮助我选择下一步要学习的语言(我已经知道Ruby)


有人能给我解释一下如何用Perl编写一个方法吗?我已经在谷歌上搜索过了,但我似乎无法用“Perl中的方法”取得任何进展。我将非常感激您提前感谢您。

您在代码中似乎没有做任何面向对象的事情,因此方法似乎有些过火。更常见的是使用简单的

如果你真的想使用一种方法,那就是经典的方法。不过,现在很多人都在用它来编写OO代码


它仍然归结为写一个子,只是一个放在一个包定义的中间而不是一个简单的脚本。

你似乎没有在那个代码中做任何OO,所以一个方法似乎是多余的。更常见的是使用简单的

如果你真的想使用一种方法,那就是经典的方法。不过,现在很多人都在用它来编写OO代码


仍然归结为写一个子,只是一个放在一个包定义的中间,而不是一个简单的脚本。

在Perl,不是所有的东西都是一个自动的对象,所以本身没有方法。函数称为子例程,或sub。您可以使用
sub
关键字创建一个

sub foo {
  # ...
}
您可以使用标识符来调用它。在我们的示例中,这是:

foo();

有关更多详细信息,请参阅[tag wiki]中链接的各种资源,或检查。

在Perl中,并非所有内容都自动成为对象,因此没有方法本身。函数称为子例程,或sub。您可以使用
sub
关键字创建一个

sub foo {
  # ...
}
您可以使用标识符来调用它。在我们的示例中,这是:

foo();
有关更多详细信息,请参阅[tag wiki]中链接的各种资源,或检查。

对于perl,变量有“符号”来确定其“类型”:

从perl版本5.10开始,有一个可选的
say
命令可用。它相当于ruby的
put

use feature qw(say);
say "I get a newline automatically.";

求数组的长度

my $num = scalar @choices;   # or,
my $num = @choices;
数组的随机元素:

my $rand_elem = $choices[rand @choices];
对于perl,变量有“符号”来确定其“类型”:

从perl版本5.10开始,有一个可选的
say
命令可用。它相当于ruby的
put

use feature qw(say);
say "I get a newline automatically.";

求数组的长度

my $num = scalar @choices;   # or,
my $num = @choices;
数组的随机元素:

my $rand_elem = $choices[rand @choices];

请在此参阅Perl标记wiki中的教程。那里有很多好的资源。至于我的个人建议,仅仅通过实现这样一个简单的选择,你可能无法决定你想学什么或你觉得舒服些什么。感谢你的建议,我将对此进行研究。请参考Perl标记wiki中的教程。那里有很多好的资源。至于我的个人建议,你可能无法仅仅通过实现这样一个简单的选择来决定你想学什么或者你觉得舒服些什么。谢谢你的建议,我会仔细考虑的