পার্লের নেটিভ বুলিয়ান টাইপ নেই, তবে একই আচরণ পেতে আপনি পূর্ণসংখ্যা বা স্ট্রিংগুলির তুলনা ব্যবহার করতে পারেন। পূর্ণসংখ্যার তুলনা ব্যবহার করে এটি করার একটি দুর্দান্ত উপায় অ্যালানের উদাহরণ। এখানে একটি উদাহরণ
my $boolean = 0;
if ( $boolean ) {
print "$boolean evaluates to true\n";
} else {
print "$boolean evaluates to false\n";
}
আমার কিছু প্রোগ্রামে আমি একটি জিনিস করেছি যা ধ্রুবক ব্যবহার করে একই আচরণ যুক্ত করা হয়:
#!/usr/bin/perl
use strict;
use warnings;
use constant false => 0;
use constant true => 1;
my $val1 = true;
my $val2 = false;
print $val1, " && ", $val2;
if ( $val1 && $val2 ) {
print " evaluates to true.\n";
} else {
print " evaluates to false.\n";
}
print $val1, " || ", $val2;
if ( $val1 || $val2 ) {
print " evaluates to true.\n";
} else {
print " evaluates to false.\n";
}
"ব্যবহার ধ্রুবক" চিহ্নিত চিহ্নিত রেখাগুলি একটি স্থির নামযুক্ত সত্যকে সংজ্ঞায়িত করে যা সর্বদা 1 এর জন্য মূল্যায়ন করে, এবং একটি ধ্রুবকযুক্ত মিথ্যা যা সর্বদা 0 দ্বারা মূল্যায়ন করে 0. কারণ পার্লে ধ্রুবকগুলি যেভাবে সংজ্ঞায়িত করা হয়েছে, নিম্নলিখিত কোডের লাইনগুলিও ব্যর্থ হয়:
true = 0;
true = false;
ত্রুটি বার্তায় "স্কেলার অ্যাসাইনমেন্টে ধ্রুবক পরিবর্তন করতে পারে না" এর মতো কিছু বলা উচিত।
আমি দেখেছি যে একটি মন্তব্যে আপনি স্ট্রিংগুলির তুলনা সম্পর্কে জিজ্ঞাসা করেছেন। আপনার জানা উচিত যে পার্ল স্কেলার ভেরিয়েবলগুলিতে স্ট্রিং এবং সংখ্যাগত প্রকারগুলি একত্রিত করে আপনার কাছে স্ট্রিং এবং সংখ্যার তুলনা করার জন্য আলাদা সিনট্যাক্স রয়েছে:
my $var1 = "5.0";
my $var2 = "5";
print "using operator eq\n";
if ( $var1 eq $var2 ) {
print "$var1 and $var2 are equal!\n";
} else {
print "$var1 and $var2 are not equal!\n";
}
print "using operator ==\n";
if ( $var1 == $var2 ) {
print "$var1 and $var2 are equal!\n";
} else {
print "$var1 and $var2 are not equal!\n";
}
এই অপারেটরগুলির মধ্যে পার্থক্য পার্ল মধ্যে বিভ্রান্তির একটি খুব সাধারণ উত্স।