#perl 语言简明教程

#perl 语言简明教程
#1.perl语言采用#号作为单行注释
#多行注释如下 被=pod =cut包裹起来的是多行注释

=pod
这里是多行注释
=cut

#1.变量
#perl语言中只有3种变量
#1.普通变量（标量）
#2.数组变量（列表）
#3.hash变量（hash表）
#声明方法
#标量
$a = 1;
$scalar = 10;
$s = "sdsd";
$s1 = 'asdasd';

#数组
print @arr = ( 1, 2, 3, 4, 5, 6 );
&p;
print @arr100 = ( 1 .. 100 );
&p;
#hash表
print $hash= { 'a' => "abc", 'b' => "b" };
print $hash->{a};
&p;

#函数定义
#sub funcname{
# 参数在@_中
# @_[0]第一个参数
# @_[1]第二个参数
# @_[2]第三个参数
# 以此类推
#}
#函数调用
#在函数名前面加一个&
sub p{#此函数用来辅助打印
&println;
}
sub println{
print "n";
}
#正则表达式使用方法（异常简单）
#正则表达式只有五种元素 分别为 1.元数据。2.量词。3.分组。4.反向引用。5.字面量
#查找
$str='abc';
$str=~/ab.*/;#使用.元数据和*量词
#匹配结果在$&中
print $&;
&p;
$str="abc1234";
$str=~/abc(d )/;#元数据d,量词 分组(d )
print $&;#匹配全部
&p;
print $1;#第一组
&p;
$str='abcabc1234';
$str=~/(abc)1(d )/;#字面量abc,分组一(abc),反向引用第一组1,元数据d,量词 分组二(d )
print $&;
&p;
print $1;
&p;
print $2;
#替换
&p;
$str='abcfiredabctoadabc';
$str=~s/abc//g;#将所有abc替换为空g开关表示替换全部不带g表示只替换一个
print $str;

您可能感兴趣的文章：
php用什么语言写
php是什么格式的文件？
pcre是什么？
php底层用什么写的？
python是什么编程语言
php主要是干什么用的
python是c语言编的吗
php可以和java一起开发吗
php是编程语言吗？
php全称是什么