तोता - शाखाएँ
प्रवाह नियंत्रण के बिना कोड थोड़ा उबाऊ हो जाता है; शुरुआत के लिए, तोता शाखा और लेबल के बारे में जानता है। शाखा ऑप पर्ल के गोटो के बराबर है:
branch TERRY
JOHN: print "fjords\n"
branch END
MICHAEL: print " pining"
branch GRAHAM
TERRY: print "It's"
branch MICHAEL
GRAHAM: print " for the "
branch JOHN
END: end
यह देखने के लिए सरल परीक्षण भी कर सकते हैं कि क्या एक रजिस्टर में एक सही मूल्य है:
set I1, 12
set I2, 5
mod I3, I2, I2
if I3, REMAIND, DIVISOR
REMAIND: print "5 divides 12 with remainder "
print I3
branch DONE
DIVISOR: print "5 is an integer divisor of 12"
DONE: print "\n"
end
तुलना के लिए यहां पर्ल में क्या दिखेगा:
$i1 = 12;
$i2 = 5;
$i3 = $i1 % $i2;
if ($i3) {
print "5 divides 12 with remainder ";
print $i3;
} else {
print "5 is an integer divisor of 12";
}
print "\n";
exit;
तोता संचालक
हमारे पास संख्यात्मक तुलनाकर्ताओं की पूरी श्रृंखला है: eq, ne, lt, gt, le और ge। ध्यान दें कि आप इन ऑपरेटरों को असमान प्रकार के तर्कों पर उपयोग नहीं कर सकते हैं; आपको ऑपिक्स _i या _n को ऑप से जोड़ने की भी आवश्यकता हो सकती है, यह बताने के लिए कि आप किस प्रकार के तर्क का उपयोग कर रहे हैं, हालांकि कोडांतरक को आपके लिए यह परमात्मा चाहिए, जब तक आप इसे पढ़ नहीं लेते।