Google AdSense 身分驗證

Google AdSense 身分驗證

有天，阿逸打開Google AdSense的首頁時，

發現出現這排紅字：

「您的款項目前暫緩支付。若要取消暫緩支付，您必須進行特定操作。」

第一時間看到真的是嚇到了，像是做了什麼虧心事一樣，哈哈！

後來查了一下，發現是達到了「身分驗證門檻」，

即是收入超過10鎂時，會由Google發出信件，

裡面包含驗證碼，確認你填寫的地址正確，

以便日後達到請款門檻時(須達到100鎂)，方便把支票寄給你。

---

原本以為如下圖所示，3~5天就會寄到家裡，

誰知道等了一個星期仍舊沒有下文，

後來去查才知道，那是指美國本地的寄送時間，

其他國家會慢上許多，台灣約是3~4週。

這事情後來就擱著，一直到四週了，

終於收到來自美國Google的信呢！

(正面)

(背面)

可以看到是從美國Google寄過來的呢！

(內文)

而且內文是繁體中文！

個人隱私的部分，就原諒我把它海苔了 (?)

---

因為很多新手部落客都問過類似問題，

的確很多人超過一、兩週沒收到信，

就擔心是不是遺失了，(阿逸自己也是 Orz)

阿逸自己收到的時間是一個月後！

沒收到的各部落客，可以稍微等一下。

迴圈控制敘述(Loop Control Statements)

迴圈控制敘述(Loop Control Statements)

我們知道迴圈可以幫助程式，「反覆進行」同一個區塊內的運算，

但有時候我們會希望，迴圈能「跳過」某次運算，或是「轉向」其他程式區塊。

這個「跳過」或「轉向」的操作，就是這篇迴圈控制要說明的部分了。

靈活的迴圈控制能節省程式執行時間，

但必須謹慎的使用，避免程式結構被破壞而導致維護上的困難。

之前提過的for、foreach、while、until，

我們在控制敘述的重複執行有說明，

在這裡我們就討論，怎麼在這幾個迴圈內做操作吧！

---

last

顧名思義就是讓迴圈停止。

用法是寫在迴圈內，我們來用例子說明：

for ($i=0;$i<10;$i++)

{ # $i會先從0開始 每跑完一次就會累加1

if($i==8) # 當$i為8時

{

last; # 終止迴圈

}

print $i; # 把$i印出來

}

執行結果就會看到 只印到7就不執行了。

如果要偷懶點的寫法，可以寫成：

for ($i=0;$i<10;$i++)

{ # $i會先從0開始 每跑完一次就會累加1

last if($i==8); # 當$i為8時終止

print $i; # 把$i印出來

}

執行結果會是相同的。

---

redo

可以讓迴圈重複執行一次，

用法同樣是寫在迴圈內，來看例子：

$count=0; # 迴圈外放一個計數器

for ($i=0;$i<10;$i++)

{ # $i會先從0開始 每跑完一次就會累加1

$count++;

redo if($count==8); # 當$count為8時重作"一次"迴圈

print $count; # 把$count印出來

}

執行結果就會看到，8多加了一次，結果就是8沒有印出來。

---

next

既然可以讓迴圈停止、重作，

當然，一樣就有「略過」的控制敘述，

用法同樣是寫在迴圈內，來看例子：

for ($i=0;$i<10;$i++)

{ # $i會先從0開始 每跑完一次就會累加1

next if($i==8); # 當$i為8時略過

print $i; # 把$i印出來

}

執行結果就會看到，8沒有被印出來。

---

知道了迴圈的「終止」、「重作」、「略過」之後，

最後一個我們要看的，是用來做「轉向」的標籤(Label)

標籤的作用是讓Perl知道接下來要跳到哪裡去，

很多程式設計師很反對使用標籤，因為會對程式架構上，有一定程度的破壞。

不過阿逸自己則是認為，適時的使用反而會增加方便性。

有時候單單利用next或last無法逃離迴圈到正確的地方時，

就會使用到標籤(Label)。標籤使用方式為：

1.定義標籤所在位置及名稱，要大寫，並且要有冒號(:)。

2.使用時，加上goto 以及標籤名稱。

直接來看怎麼用吧：

@array= qw/123 456 789 246 468 135 357/; # 依序放入陣列

$pattern= 456; # 用來比對的樣式

foreach (@array)

{

print $_; # 印出每次讀取的陣列內容

if ($pattern== $_) # 比對成功時

{

goto LABEL; # 轉向到標籤點

}

}

LABEL: # 記住 這裡是使用冒號(:) 表示標籤的定位點

執行結果就會看到，符合條件後，程式就跳到迴圈外的標籤。

---

接下來就要加入一些檔案處理的觀念了，

要進行的部分是Perl的檔案存取。