
perl语言
宁静以致墨
慢下来,享受技术,找一个安静的位置
展开
-
perl 语言学习 0512
#!/usr/bin/perl -w@lines = 'perdoc - u -fatan2'; //不要把反引号和单引号搞混foreach(@lines){ s/\w}+)>/\U$1/g; print; #print "Hello, world!\n"}标量是Perl里面最简单的一个数据类型。对大部分标量来说,它要么是数字,要么是由原创 2017-05-12 19:06:18 · 490 阅读 · 0 评论 -
perl 学习 0515
借助代码点创建字符$alef = chr(0x05D0);$alpha = chr(hex('03B1'));$omega = chr(0x03C9);可以通过ord()函数把字符串转换为代码点:$code_point = ord('?');比较 数字 字符串相等 == eq不等 != ne原创 2017-05-15 18:54:30 · 433 阅读 · 0 评论 -
perl学习 0517
列表的赋值($fred, $barney) = ($barney, $fred); 交换这两个变量的值@ 引用整个数组。注:将某个数组复制到另一个数组时,仍然算是列表的赋值运算,只不过这些列表是存储在数组里而已。@copy = @quarry; #将一个数组中的列表复制到另一个数组pop和push操作符@array = 5..9;$fred = pop原创 2017-05-17 20:06:59 · 461 阅读 · 0 评论