perl 第12弹 判断结构
Posted 流浪骆驼
tags:
篇首语:本文由小常识网(cha138.com)小编为大家整理,主要介绍了perl 第12弹 判断结构相关的知识,希望对你有一定的参考价值。
上期回顾
上面说到perl的各种运算符,正是perl的各种运算符把一个个数据点石成金。如果使用不当。。。。。。。
如果真的是这样,
判断结构
各种编程语言中if总是不变的旋律,他也是我们今天的主角。
假设一个场景,有一个赌徒,酩酊大醉的早上做了一个决定,如果我的兜里有2元钱,我就去买彩票;否则只能乖乖挨饿。
思路大概如上图所示。这个赌徒还懂点编程,就换成perl伪代码了。
if ($pocket_RMB > 2){
# 买彩票
}else{
# 挨饿
}
想想又想来点刺激的,才能不枉度此生。于是改成,如果中奖,就买1箱方便面,吃一袋扔一袋,想想就开心。如果没有,就去霍格沃茨魔法学院学点技能混口饭吃。如果没有2元,就干票大的。
这个懂点编程赌徒又换成perl伪代码了。
if ($pocket_RMB > 2){
# 买彩票
if ( $lottery_number == True ){
# 买1箱方便面,吃一袋扔一袋
}else{
# 霍格沃茨魔法学院学点技能混口饭吃
}
}else{
# 干票大的
}
好像遗漏了些什么,干票大的得周密一点才是。。。得后半夜行动,凌晨0点到4点前,除非运气差,告别热爱的赌博事业,否则,就买1箱方便面,吃一袋扔一袋,想想就开心。
这个懂点编程赌徒双换成perl伪代码了。
if ($pocket_RMB > 2){
# 买彩票
if ( $lottery_number == True ){
# 买1箱方便面,吃一袋扔一袋
}else{
# 霍格沃茨魔法学院学点技能混口饭吃
}
}else{
if ( $hour >= 0 && $hour < 4 ){
# 行动
unless ( $fortune eq 'bad' ){
# 买1箱方便面,吃一袋扔一袋
}else{
# 告别热爱的赌博事业
}
}
}
# 还有很多很多
if (condition){
# ...
}elseif(condition){
# ...
}else{
# ...
}
在那个早上赌徒在街头又深深的睡。。。。
总结
学习if unless 条件结构
以上是关于perl 第12弹 判断结构的主要内容,如果未能解决你的问题,请参考以下文章