征服Perl——子程序等相关知识——里程碑M5
2012-03-16 12:33
357 查看
1 在Perl中的子程序是这样写的
sub sum
{
$a+$b;
}
$a=2;
$b=3;
print &sum,"\n";
子程序任何时候都有返回值,在一个就是调用子程序就是&+子程序名
2 参数,在Perl中也是可以传参数的,但是参数自动存放在@_的数组中,也就是说参数存放在$_[0],$_[1]依次下推
3 看来Perl的子程序还真是cool啊!
4 Perl在每次调用时给我们提供@_这个私有变量
5 默认情况下Perl的所有变量都是全局的,当然你也可以定义私有的:my($a)
6 在实际的Perl代码中,传递给子程序的参数个数是没有限制的
7 下面的是著名的算法,笔试的时候也经常考,呵呵,记住了啊!
sub max
{
my($max_so_far)=shift @_;
foreach (@_)
{
if($_>$max_so_far)
{
$max_so_far=$_;
}
}
print $max_so_far;
}
&max(3,5,10,4,6);
8 Perl的语法是很宽松的,如果你想让Perl变的严格点,那么就在代码的开始处添加,下面的话
use strict
sub sum
{
$a+$b;
}
$a=2;
$b=3;
print &sum,"\n";
子程序任何时候都有返回值,在一个就是调用子程序就是&+子程序名
2 参数,在Perl中也是可以传参数的,但是参数自动存放在@_的数组中,也就是说参数存放在$_[0],$_[1]依次下推
3 看来Perl的子程序还真是cool啊!
4 Perl在每次调用时给我们提供@_这个私有变量
5 默认情况下Perl的所有变量都是全局的,当然你也可以定义私有的:my($a)
6 在实际的Perl代码中,传递给子程序的参数个数是没有限制的
7 下面的是著名的算法,笔试的时候也经常考,呵呵,记住了啊!
sub max
{
my($max_so_far)=shift @_;
foreach (@_)
{
if($_>$max_so_far)
{
$max_so_far=$_;
}
}
print $max_so_far;
}
&max(3,5,10,4,6);
8 Perl的语法是很宽松的,如果你想让Perl变的严格点,那么就在代码的开始处添加,下面的话
use strict
相关文章推荐
- 征服Perl——子程序等相关知识——里程碑M5
- 征服Perl——输入输出相关知识——里程碑M6
- 征服Perl——输入输出相关知识——里程碑M6
- 征服Perl——基础知识——里程碑M4
- 征服Perl——基础知识——里程碑M4
- 征服Perl——基础知识——里程碑M3
- 征服Perl——初识Perl——里程碑M1
- 征服Perl——基础知识——里程碑M3
- perl引用的相关知识分享
- perl 调试命令的相关知识小结
- 征服Perl——初识Perl——里程碑M1
- 关于Handler 的相关知识
- 音视频编码格式相关知识(转载)
- Linux口令相关知识
- PHP需要拷到system32下的加载库及一些相关知识
- 线程 相关知识(二)
- LINUX驱动IOCTL函数相关知识
- 通信相关基础知识0(FFT相关第一篇--傅里叶分析之掐死教程完整版)
- Java多线程相关知识记录
- 启动文件和2440启动方式相关知识