Perl学习之例程(子程序)(1 位领导批示)
- 2008-05-23
- 分类：Perl
- 作者：银子
- 3,366 位领导视察
例程 Subroutine 类似vbscript 中的子例程..在perl里也叫做函数(function),是结构化程序设计的基础。它接受多个输入参数，返回一个输出参数。
之所以说类似vbscript,就是定义时的语法几乎完全一样
sub subroutine_name(){...}
一个简单的例子:
use strict;#严格声明..加了这个之后使用变量之前必须声明.如:my $fs;
use warnings;
use Win32::OLE; #加载WIN32::OLE模块
sub getPath($)
{
my $wawa = shift;#shift是用来替换传递的例程参数
my $fs = Win32::OLE->new("Scripting.FileSystemObject");
my $folder = $fs->GetFolder(".");
my $ls_path = $folder->path;
return $wawa.$ls_path;
}
my $path = getPath('当前路径:');
print $path;
打印出当前文件所在的绝对路径..
Win32::OLE 是perl中实现对OLE对象的支持的模块.
