perl子例程
2019獨角獸企業重金招聘Python工程師標準>>>
sub?子例程名($$)指定兩個標量的參數
(@$)指定一個數組
按引用調用
符號引用?typeglob
類似于UNIX文件系統中的軟鏈接
星號(*)適用于任意類型的變量,包括標量,數組,散列,文件句柄和子例程等
選擇性別名和反斜杠運算符
*array?=?\@array ;
*scalary?=?\$scalary;
*hash?=?\%hash;
*func?=?\&subroutine;
硬引用
通常又稱為指針
是含有其他變量地址的標量型變量,通過反斜杠運算符來創建指針。打印指針可以看見十六進制的地址
下面是我寫的一個小例子,是書上的習題
use strict;
my %hotels = ("Pillowmint" => "5",
? ? ? ? ? ? ? ? "Buxton Suites" => "5",
? ? ? ? ? ? ? ? "The Middletonian" => "3" ,
? ? ? ? ? ? ? ? "Notchbelow" => "4" ,
? ? ? ? ? ? ? ? "Rancho El Cheapo" => "1",
? ? ? ? ? ? ? ? "Pile Inn" => "2");
? ? ? ? ? ? ? ??
printstar(\%hotels);
sub printstar {
? ? my $ref = shift;
? ? my @keys = sort {$ref->{$b} <=> $ref->{$a}} keys %$ref;
? ? foreach (@keys) {
? ? ? ? if($ref->{$_} eq "5") {
? ? ? ? ? print "$_|*****\n";
? ? ? ? } elsif($ref->{$_} eq "4") {
? ? ? ? ? ? print "$_|****\n";
? ? ? ? } elsif ($ref->{$_} eq "3") {
? ? ? ? ? ? print "$_|***\n";
? ? ? ? } elsif ($ref->{$_} eq "2") {
? ? ? ? ? ? print "$_|**\n";
? ? ? ? } else {
? ? ? ? ? ? print "$_|*\n";
? ? ? ? }
? ? }
}
轉載于:https://my.oschina.net/u/854744/blog/418228
總結
- 上一篇: 6个黑科技网站
- 下一篇: vb.net 画多个矩形_电气原理图和接