reverse(perl)

来源:百度知道 编辑:UC知道 时间:2024/09/22 20:31:53
请看下面的程序:
#!/usr/bin/perl -w

@words="Can you speak in english?";
@dingxin=reverse(@words);
print @dingxin, "\n";

我觉得输出应该是?english in speak you can
可运行后是Can you speak in english? 请问是为什么?

请注意数组赋值的方式。

源程序:@words="Can you speak in english?";
建议 :@words=("Can","you","speak","in","english","?");

你没有明白reverse的用法,它是反转数组的。而你定义的数组里面只有一个元素,那就是"Can you speak in english?"。
要达到你要的效果,可以用:
@words=("Can ","you ","speak ","in ","english ","?");
也可以:
push(@words,"Can ");
push(@words,"You ");
push(@words,"speak ");
push(@words,"in ");
push(@words,"enlish ");
push(@words,"?");
你要根据实际需要来考虑用什么样的格式