本文笔者在北京逛街的时候突然想到的...今天就有想写几篇关于类型数组的博客，所以回家到之后就奋笔疾书的写出来发布了
1
写在perl6之前
2
perl6的安装
3
学习perl6
3.1
字符串
用法
1:
my $fve = 5;
2:
print "an interpolating string, just like in perl $five\n";
3:
say 'say() adds a newline to the output,just like in perl 5.10';
4:
say 'new line with out \n";
5:
#这里的一个新的特性就是，say自动添加换行符。不必你手动加入了
貌似双引号的功能也有所改变，但是怎么改变的还没有详细的看到。
字符串被双引号包括（变量内插）或者用单引号，反斜杠和perl5一样。 变量内插的规则有了一些变化，上面的情况将被变量内插
1:
my $scalar = 6;
2:
my @array =1,2,3;
3:
say "Perl $scalar";
4:
say "An @array[]"; #空索引，结果是整个数组，1，2，3
5:
say "@array[1]";
6:
say "Code:{$scalar*2}";#大括号中的部分会被当作代码，结果是内插的，结果是12
数组和hash只有在前面随着索引的时候，或者随着以（）开头的方法的时候才会变量内插。 如”some $obj.method()"),空的索引内插整个hash或者数组。
3.2
数组
数组相干新方法
1:
@array.keys(); #获得数组的下标
2:
@array.values(); #获得数组的值
3:
@array.kv(); #下标和值一同获得
4:
@array.elems(); #元素的个数
5:
@array.exists(num）； #判断某个下标值是不是存在，
6:
@array.max()； #最大值
7:
@array.min()； #最小值
1:
my @array = 1,2,3,'foo'; #括号不再需要
2:
my $sum = @array[0]+@array[1]; #单个数组元素也是以@扫尾
3:
my @array[1,3]; #数组切片仍然可用
4:
my $num_of_element = @array.elems;
5:
#元素的个数，在perl6中通过这类方式，而不是各种奇异的符号，
6:
my $num_of_element = +@array #是求元素个数的另外一种方法。
7:
my $last_item = @array[*-1]; #数组的最后一个元素
8:
1:
@array.pick(num); #随机取出数组中的不重复元素
2:
#例子
3:
my @array = <a b c d e>;
4:
say @array.pick(4);
5:
say @array.pick(*);#*代表全部元素
全部的都是对象，你可以call mechods on arrays；
1:
my @array = <5 7 3 6>;
2:
' #以前这样写@array = qw/5 7 3 6/；现在可以按照上面的方法写
3:
my @b = @a.sort; #对@array使用方法“排序”
4:
say @b; #结果为3 5 6 7
5:
say @b.elems; #数组元素，结果为4
6:
if @b > 2 {say “yes”}
7:
say @b.end; #最后一个元素的下标，结果为3
8:
my @c = @b.map ({$_*2});
9:
say @c； #结果为6 10 12 14
10:
3.3
hash
1:
my %drinks =
2:
France => 'Wine',
3:
Bavaria => 'Beer',
4:
USA => 'Coke';
5:
say "The people in France love ",%drinks{'France'};
6:
my @countries = %drinks.keys.sort;
7:
#%drinks{'France'};现在的用法
8:
#$drinks{France}; 以前的用法
9:
#%drinks<France>; 现在也可以这样用
全部的内建方法，可以是method也可以是一个子程序，所以这两种方法 都对，sort @array @array.sort.
最后你要知道，全部的[..] {..}(occurring direct after a term) 仅仅是在使用一个特定的方法，而不是和数组和hash想相联系的。
1:
my $a = [1,2,3];
2:
say $a[2]; #3
3:
#this implies that you don't need special dereferencing syntax,and that you can
4:
#act as arrays, hashes and subs at the same time.没整明确？？？
3.4
Types 类型
在perl6从都有类型，全部的东西都可以当作一个对象，都有一个类型。 变量也可以有一个类型的约束，但是不是必须需要一个类型。
1:
'a string' #str字符串
2:
2 #int整数型
3:
3.14 #Rat (rational number)有理数
4:
（1，2，3) #Seq列表
5:
#全部的内建类型都是大写字母扫尾，全部的标准类型都是继承了Any，并且全部的都继承了Mu
6:
7:
#你可以在声明的时候，加上类型
8:
my Numeric $x = 3,4;
9:
my $Int @a 1,2,3;
10:
11:
#对一个数组类型的类型定义，作用在数组的元素上，
12:
#Str @s @s这个数组只能够包括字符串元素的数组
13:
14:
#一些类型是隶属与一个大的分类，比如：整数型（Int），有理数（Rat），浮点型（Num）都是属于
15:
#Numeric这个大的类型
16:
17:
#要知道一个对象的类型，可以使用.WHAT的方法
18:
say "foo".WHAT;
19:
#如果你要确定一个特殊类型的方法，还有一个方法，
20:
if $x ~~ Int
21:
{
22:
say 'Variable $x contains an integer';
23:
}
我们需要类型的原因
1.编程更加安全
如果你声明确一个特殊的类型，那么你可以执行特定的某种操作，而不必检查
2.可优化的
如果在编译的时候供给了类型，那么运行的程序会有明显的优化。在原则上perl6 不会比C慢
3.可扩展型
有了类型信息和多重的操作路径，你可以很轻易对特定的类型改善操作
3.5
基本的控制结构
perl6 和perl5 的控制结构基本雷同，最大的不同是你不必在if,while,for等，前面添加 小括号了。事实上全部的标示符前面紧随着小括号，都会被当作在调用子程序一个名称为if的子 程序，for前面加一个空格，可以改善这类情况，但是直接省略括号更加安全。
if控制结构
1:
#if结构是变化最小的，你仍然可以用elsif和else，unless也还在，但是在unless前面不允许else
2:
#分支结构
3:
if $sheep == 0 {say "how boring";}
4:
elsif $sheep ==1 {say "one lonely sheep";}
5:
else {say "a herd,How lovely!";}
6:
7:
#你仍然可以这样用
8:
say "you won" if $answer == 42;
Loops
1:
for 1..100 -> $x
2:
{
3:
say $x;#会输出1 2 3 。。
4:
}
5:
#->$x{..}被称为‘pointy block'犹如匿名子程序或者lisp中的lambda
6:
#也可以有不止一个的循环变量
7:
for 0..5 ->$even,$odd
8:
{
9:
say "Even: $even \t Odd: $odd";
10:
}
11:
#结果如下：
12:
#Event:1 Odd：2
13:
#也就是交替出现
14:
15:
#这个也是hash的迭代的方法
16:
my %hash=
17:
a => 1,
18:
b => 2,
19:
c => 3;
20:
for %hash.kv -> $key,$value
21:
{
22:
say "$key: $value";
23:
}
24:
25:
#C-风格的for循环
26:
loop （my $x=1;$x<100;$x**2)
27:
{
28:
say $x;
29:
}
Author: GRC <grc@grc>
Date: 2013-05-19 14:55:01 CST
HTML generated by org-mode 6.33x in emacs 23
文章结束给大家分享下程序员的一些笑话语录： 大家喝的是啤酒，这时你入座了。
你给自己倒了杯可乐，这叫低配置。
你给自已倒了杯啤酒，这叫标准配置。
你给自己倒了杯茶水，这茶的颜色还跟啤酒一样，这叫木马。
你给自己倒了杯可乐，还滴了几滴醋，不仅颜色跟啤酒一样，而且不冒热气还有泡泡，这叫超级木马。
你的同事给你倒了杯白酒，这叫推荐配置。
菜过三巡，你就不跟他们客气了。
你向对面的人敬酒，这叫p2p。
你向对面的人敬酒，他回敬你，你又再敬他……，这叫tcp。
你向一桌人挨个敬酒，这叫令牌环。
你说只要是兄弟就干了这杯，这叫广播。
有一个人过来向这桌敬酒，你说不行你先过了我这关，这叫防火墙。
你的小弟们过来敬你酒，这叫一对多。
你是boss，所有人过来敬你酒，这叫服务器。
酒是一样的，可是喝酒的人是不同的。
你越喝脸越红，这叫频繁分配释放资源。
你越喝脸越白，这叫资源不释放。
你已经醉了，却说我还能喝，叫做资源额度不足。
你明明能喝，却说我已经醉了，叫做资源保留。
喝酒喝到最后的结果都一样
你突然跑向厕所，这叫捕获异常。
你在厕所吐了，反而觉得状态不错，这叫清空内存。
你在台面上吐了，觉得很惭愧，这叫程序异常。
你在boss面前吐了，觉得很害怕，这叫系统崩溃。
你吐到了boss身上，只能索性晕倒了，这叫硬件休克。