Control Flow Statements (নিয়ন্ত্রণ প্রবাহ স্টেটমেন্টস)

টিসিএল (Tcl) - নিয়ন্ত্রণ প্রবাহ স্টেটমেন্টস (Control Flow Statements): বিস্তারিত আলোচনা

টিসিএল (Tcl) একটি স্ক্রিপ্টিং ভাষা যা প্রোগ্রামিংয়ের নিয়ন্ত্রণ প্রবাহ পরিচালনার জন্য বিভিন্ন ধরনের স্টেটমেন্ট বা নিয়ন্ত্রণ কাঠামো প্রদান করে। নিয়ন্ত্রণ প্রবাহ স্টেটমেন্টগুলি প্রোগ্রামের লজিক অনুযায়ী কোডের কার্যক্রম নিয়ন্ত্রণ করতে সহায়তা করে। এগুলির মাধ্যমে আপনি শর্ত বা অবস্থার উপর ভিত্তি করে কোডের বিভিন্ন অংশ চালনা করতে পারেন।

১. If-Else স্টেটমেন্ট (If-Else Statement)

if স্টেটমেন্টের মাধ্যমে কোন শর্ত যাচাই করা হয় এবং শর্তটি সত্য হলে নির্দিষ্ট কোড কার্যকর হয়। else স্টেটমেন্টটি শর্ত মিথ্যা হলে চালানো হয়।

উদাহরণ:

set age 20
if { $age >= 18 } {
    puts "You are an adult."
} else {
    puts "You are a minor."
}

এখানে, যদি বয়স ১৮ বা তার বেশি হয়, তবে "You are an adult." মেসেজটি প্রিন্ট হবে, অন্যথায় "You are a minor." প্রিন্ট হবে।

২. Elif স্টেটমেন্ট (Elif Statement)

elif (else if) স্টেটমেন্টটি একাধিক শর্ত যাচাই করার জন্য ব্যবহৃত হয়। যদি প্রথম শর্ত মিথ্যা হয়, তবে দ্বিতীয় শর্ত পরীক্ষা করা হয়।

উদাহরণ:

set age 20
if { $age < 18 } {
    puts "You are a minor."
} elif { $age == 18 } {
    puts "You are exactly 18 years old."
} else {
    puts "You are an adult."
}

এখানে, প্রথমে বয়স ১৮ এর কম হলে "You are a minor." প্রিন্ট হবে, যদি বয়স ১৮ হয় তবে "You are exactly 18 years old." প্রিন্ট হবে, অন্যথায় "You are an adult." প্রিন্ট হবে।

৩. Switch স্টেটমেন্ট (Switch Statement)

switch স্টেটমেন্টটি একাধিক মান পরীক্ষা করার জন্য ব্যবহৃত হয়। এটি বেশ কিছু শর্তের মধ্যে তুলনা করে এবং যেটি মেলে তার সাথে সম্পর্কিত কোডটি চালায়।

উদাহরণ:

set day "Monday"
switch $day {
    "Monday" {
        puts "Start of the week."
    }
    "Friday" {
        puts "Last day of work."
    }
    "Saturday" {
        puts "Weekend!"
    }
    default {
        puts "Midweek day."
    }
}

এখানে, switch স্টেটমেন্টের মাধ্যমে day ভেরিয়েবলের মানের সাথে মেলে এমন শর্তটি অনুসন্ধান করা হচ্ছে। "Monday" হলে "Start of the week." প্রিন্ট হবে, "Friday" হলে "Last day of work.", "Saturday" হলে "Weekend!" এবং অন্য কোন দিন হলে "Midweek day." প্রিন্ট হবে।

৪. For লুপ (For Loop)

for লুপটি নির্দিষ্ট শর্ত মেনে নির্দিষ্ট সংখ্যক বার কোড এক্সিকিউট করতে ব্যবহৃত হয়। এটি সাধারণত একটি কন্ট্রোল ভেরিয়েবল, শর্ত এবং ইনক্রিমেন্ট/ডিক্রিমেন্ট ধারণ করে।

উদাহরণ:

for {set i 0} {$i < 5} {incr i} {
    puts "The value of i is $i"
}

এখানে, i ভেরিয়েবলটি ০ থেকে শুরু হয় এবং এটি ৫ এর কম হওয়া পর্যন্ত লুপটি চালানো হয়। প্রতিবার লুপের শেষে i এর মান এক বাড়ানো হয়। আউটপুট হবে:

The value of i is 0
The value of i is 1
The value of i is 2
The value of i is 3
The value of i is 4

৫. While লুপ (While Loop)

while লুপটি একটি শর্তের উপর ভিত্তি করে কোড এক্সিকিউট করতে ব্যবহৃত হয়। যতক্ষণ শর্তটি সত্য থাকে ততক্ষণ কোডটি চলতে থাকে।

উদাহরণ:

set i 0
while { $i < 5 } {
    puts "The value of i is $i"
    incr i
}

এখানে, শর্ত { $i < 5 } যতক্ষণ সত্য থাকে ততক্ষণ লুপটি চলতে থাকবে এবং প্রতি বার i এর মান বৃদ্ধি পাবে। আউটপুট হবে:

The value of i is 0
The value of i is 1
The value of i is 2
The value of i is 3
The value of i is 4

৬. Break স্টেটমেন্ট (Break Statement)

break স্টেটমেন্টটি একটি লুপ বা শর্তাধীন ব্লক থেকে তৎক্ষণাৎ বাহির হয়ে যায়, অর্থাৎ এটি লুপটি শেষ করে দেয় এবং পরবর্তী কোডে চলে যায়।

উদাহরণ:

for {set i 0} {$i < 10} {incr i} {
    if { $i == 5 } {
        break
    }
    puts "The value of i is $i"
}

এখানে, লুপটি যখন i এর মান ৫ হয় তখন break স্টেটমেন্টটি লুপটিকে বন্ধ করে দেয়। আউটপুট হবে:

The value of i is 0
The value of i is 1
The value of i is 2
The value of i is 3
The value of i is 4

৭. Continue স্টেটমেন্ট (Continue Statement)

continue স্টেটমেন্টটি লুপের বর্তমান ইটারেশন বন্ধ করে দেয় এবং পরবর্তী ইটারেশন শুরু করে।

উদাহরণ:

for {set i 0} {$i < 5} {incr i} {
    if { $i == 3 } {
        continue
    }
    puts "The value of i is $i"
}

এখানে, যখন i এর মান ৩ হয় তখন continue স্টেটমেন্টটি বর্তমান ইটারেশনটি বাদ দিয়ে পরবর্তী ইটারেশন শুরু করবে। আউটপুট হবে:

The value of i is 0
The value of i is 1
The value of i is 2
The value of i is 4

৮. Return স্টেটমেন্ট (Return Statement)

return স্টেটমেন্টটি একটি ফাংশন থেকে মান ফেরত দিতে ব্যবহৃত হয়। ফাংশনের execution বন্ধ করে এবং নির্দিষ্ট মানটি ফিরিয়ে দেয়।

উদাহরণ:

proc add {a b} {
    return [expr $a + $b]
}

set result [add 5 10]
puts "The sum is $result"

এখানে, add ফাংশন দুটি সংখ্যার যোগফল ফেরত দেয়, এবং এটি result ভেরিয়েবলে ধারণ করা হয়। আউটপুট হবে:

The sum is 15

উপসংহার

টিসিএল-এ নিয়ন্ত্রণ প্রবাহ স্টেটমেন্টস (Control Flow Statements) প্রোগ্রামের লজিক এবং কার্যক্রমকে সহজে নিয়ন্ত্রণ করতে সহায়তা করে। if, else, elif, switch, for, while, break, continue, এবং return স্টেটমেন্টগুলির মাধ্যমে আপনি শর্ত এবং লুপ ব্যবহার করে প্রোগ্রামের কার্যক্রমকে ইচ্ছেমতো নিয়ন্ত্রণ করতে পারেন। এই স্টেটমেন্টগুলির মাধ্যমে আপনি আপনার কোডের কার্যকারিতা এবং প্রবাহকে আরও সূক্ষ্মভাবে কাস্টমাইজ করতে সক্ষম হবেন।

টিসিএল (Tcl) - If-else এবং Nested If স্টেটমেন্ট

টিসিএল (Tcl) একটি স্ক্রিপ্টিং ভাষা যা শর্তাধীন বিবৃতি (conditional statements) সমর্থন করে, যার মাধ্যমে আপনি কোডের কার্যকারিতা শর্ত অনুযায়ী পরিবর্তন করতে পারেন। If-else এবং Nested If স্টেটমেন্টগুলি শর্তাবলী পরীক্ষার জন্য ব্যবহৃত হয়। এগুলি দিয়ে আপনি নির্দিষ্ট শর্তের ভিত্তিতে কোড ব্লকগুলো কার্যকর করতে পারেন।

এখানে If-else এবং Nested If স্টেটমেন্ট সম্পর্কে বিস্তারিত আলোচনা করা হলো।

১. If-else স্টেটমেন্ট

If-else স্টেটমেন্ট ব্যবহৃত হয় একটি শর্ত পরীক্ষার জন্য এবং শর্তটি সত্য (true) হলে একটি কাজ এবং মিথ্যা (false) হলে অন্য কাজ করতে।

সাধারণ If-else স্টেটমেন্ট:

if {condition} {
    # এই ব্লকটি শর্ত সত্য হলে কার্যকর হবে
} else {
    # এই ব্লকটি শর্ত মিথ্যা হলে কার্যকর হবে
}

এখানে, condition একটি শর্ত যা সত্য বা মিথ্যা হতে পারে। শর্ত যদি সত্য হয়, তাহলে if ব্লকের কোড রান হবে, আর যদি শর্ত মিথ্যা হয়, তাহলে else ব্লকের কোড রান করবে।

উদাহরণ:

set age 18
if { $age >= 18 } {
    puts "You are an adult."
} else {
    puts "You are a minor."
}

এখানে, যদি age ভেরিয়েবলের মান ১৮ বা তার বেশি হয়, তাহলে "You are an adult." প্রিন্ট হবে, অন্যথায় "You are a minor." প্রিন্ট হবে।

২. Nested If স্টেটমেন্ট

Nested If স্টেটমেন্ট হলো একের ভেতরে অন্য একটি If স্টেটমেন্ট। এটি ব্যবহার করা হয় যখন আপনি একটি শর্তের উপর ভিত্তি করে আরও শর্ত পরীক্ষা করতে চান।

সাধারণ Nested If স্টেটমেন্ট:

if {condition1} {
    # প্রথম শর্ত যদি সত্য হয়, তখন এই ব্লকটি কার্যকর হবে
    if {condition2} {
        # দ্বিতীয় শর্ত যদি সত্য হয়, তখন এই ব্লকটি কার্যকর হবে
    } else {
        # দ্বিতীয় শর্ত যদি মিথ্যা হয়, তখন এই ব্লকটি কার্যকর হবে
    }
}

এখানে, প্রথম if স্টেটমেন্টের শর্ত সত্য হলে, দ্বিতীয় if স্টেটমেন্টের শর্ত পরীক্ষা করা হবে।

উদাহরণ:

set age 18
set citizenship "Bangladesh"
if { $age >= 18 } {
    if { $citizenship == "Bangladesh" } {
        puts "You are an adult citizen of Bangladesh."
    } else {
        puts "You are an adult, but not a citizen of Bangladesh."
    }
} else {
    puts "You are a minor."
}

এখানে, প্রথমে পরীক্ষা করা হচ্ছে যে age ১৮ বা তার বেশি কি না। যদি হয়, তাহলে পরবর্তী শর্তটি পরীক্ষা করা হচ্ছে যে citizenship বাংলাদেশের সাথে মেলে কি না। যদি উভয় শর্তই সত্য হয়, "You are an adult citizen of Bangladesh." মেসেজটি প্রিন্ট হবে। অন্যথায়, "You are an adult, but not a citizen of Bangladesh." বা "You are a minor." প্রিন্ট হবে।

৩. Multiple If-else and Nested If Example

set temperature 35
if { $temperature > 30 } {
    puts "It's hot."
    if { $temperature > 40 } {
        puts "It's extremely hot."
    } else {
        puts "It's hot but manageable."
    }
} else {
    puts "The weather is cool."
}

এখানে, প্রথমে temperature > 30 পরীক্ষা করা হবে। যদি তা সত্য হয়, তখন পরবর্তী শর্ত পরীক্ষা হবে temperature > 40। এর মাধ্যমে আপনি শর্ত অনুসারে ভিন্ন ভিন্ন বার্তা প্রিন্ট করতে পারেন।

৪. If-elseif-else স্টেটমেন্ট

যদি একাধিক শর্ত পরীক্ষা করতে চান, তবে elseif ব্যবহার করা যেতে পারে। এটি একাধিক শর্তের মধ্যে নির্বাচন করতে সহায়ক।

উদাহরণ:

set score 85
if { $score >= 90 } {
    puts "Excellent"
} elseif { $score >= 75 } {
    puts "Good"
} elseif { $score >= 50 } {
    puts "Average"
} else {
    puts "Fail"
}

এখানে, score এর মান অনুযায়ী প্রথম শর্ত পরীক্ষা করা হবে। যদি সেটি সত্য না হয়, তাহলে পরবর্তী elseif শর্তটি পরীক্ষা করা হবে, এবং যদি সব শর্তই মিথ্যা হয়, তবে else ব্লক কার্যকর হবে।

৫. Logical Conditions in If-else

আপনি if স্টেটমেন্টের মধ্যে লজিক্যাল অপারেটর (AND, OR) ব্যবহার করতে পারেন শর্তগুলোকে আরও জটিল এবং সুনির্দিষ্ট করতে।

উদাহরণ:

set a 10
set b 5
if { $a > 5 && $b < 10 } {
    puts "Condition met"
} else {
    puts "Condition not met"
}

এখানে, && (AND) অপারেটর ব্যবহার করে দুটি শর্ত পরীক্ষা করা হচ্ছে। শর্ত দুটি যদি সত্য হয়, তবে "Condition met" মেসেজটি প্রিন্ট হবে, অন্যথায় "Condition not met" প্রিন্ট হবে।

উপসংহার

If-else এবং Nested If স্টেটমেন্টগুলি শর্তাধীন কাজ করার জন্য টিসিএল-এ খুবই গুরুত্বপূর্ণ। If-else স্টেটমেন্ট ব্যবহার করে সহজ শর্ত পরীক্ষা করা যায়, যেখানে Nested If স্টেটমেন্টের মাধ্যমে আপনি একাধিক স্তরের শর্ত পরীক্ষা করতে পারেন। এছাড়া, elseif ব্যবহার করে একাধিক শর্তে সিদ্ধান্ত নেওয়া সহজ হয়, এবং লজিক্যাল অপারেটরস ব্যবহার করে শর্তগুলোকে আরও জটিল করা যায়।

টিসিএল (Tcl) - Switch স্টেটমেন্টের ব্যবহার

টিসিএল (Tcl) এ switch স্টেটমেন্ট ব্যবহার করে একাধিক শর্তের মধ্যে যেকোনো একটি শর্তের সাথে মিলে যাওয়ার পর কার্যকরী কমান্ড চালানো হয়। এটি if-else স্টেটমেন্টের মতো কাজ করে, তবে বেশি সংখ্যক শর্ত নিয়ে কাজ করার সময় switch অনেক বেশি পরিষ্কার এবং সহজ হয়।

switch স্টেটমেন্টে একটি মান পরীক্ষা করা হয় এবং সেটির সাথে মিলিয়ে নির্দিষ্ট কোড ব্লক চালানো হয়।

১. সাধারণ সিঙ্গেল এক্সপ্রেশন switch

switch স্টেটমেন্টে একটি একক মান বা এক্সপ্রেশন পরীক্ষিত হয়, এবং সেটি যে কেসের সাথে মিলে যাবে সেই কেসে গিয়ে কমান্ডটি চালানো হয়।

সাধারণ সিনট্যাক্স:

switch expression {
    pattern1 { command1 }
    pattern2 { command2 }
    pattern3 { command3 }
    default { command_default }
}

এখানে:

• expression হলো সেই মান বা এক্সপ্রেশন যা পরীক্ষা করা হবে।
• pattern1, pattern2, pattern3 হল সেই প্যাটার্ন বা মান যা এক্সপ্রেশনটির সাথে মিলিয়ে যাবে।
• command1, command2, command3 হল সেই কমান্ড যা প্রতিটি প্যাটার্ন মিললে চলবে।
• default হল একটি বিকল্প কেস, যদি কোন প্যাটার্নের সাথে মিল না পাওয়া যায়, তখন default অংশের কমান্ডটি চালানো হয়।

২. সাধারণ উদাহরণ (Single Value Switch)

set x 2
switch $x {
    1 { puts "Value is 1" }
    2 { puts "Value is 2" }
    3 { puts "Value is 3" }
    default { puts "Unknown value" }
}

এখানে, $x এর মান 2, তাই আউটপুট হবে:

Value is 2

যদি $x এর মান ১ বা ৩ না হয়ে অন্য কিছু হতো, তবে default এর কমান্ড "Unknown value" আউটপুট হতো।

৩. প্যাটার্নের মধ্যে রেঞ্জ ব্যবহার

switch স্টেটমেন্টে আপনি রেঞ্জ ব্যবহার করতে পারেন, যেখানে একটি সংখ্যা রেঞ্জ দিয়ে কেসগুলি পরীক্ষা করা হয়।

উদাহরণ:

set x 15
switch -regexp $x {
    {1|2|3} {puts "Value is between 1 and 3"}
    {4|5|6} {puts "Value is between 4 and 6"}
    default {puts "Value is outside the range"}
}

এখানে, switch -regexp কমান্ডটি $x এর মান পরীক্ষা করবে এবং যদি $x মান ১, ২, অথবা ৩ হয়, তাহলে "Value is between 1 and 3" আউটপুট হবে। যদি এটি ৪, ৫, অথবা ৬ হয়, "Value is between 4 and 6" আউটপুট হবে, এবং অন্য কিছু হলে "Value is outside the range"।

৪. লিস্টের মধ্যে মিল খোঁজা

আপনি লিস্ট ব্যবহার করে একাধিক মানের মধ্যে তুলনা করতে পারেন। এই পদ্ধতিতে যদি এক্সপ্রেশনটি কোন লিস্টের একটি উপাদানের সাথে মেলে, তাহলে সেই কেসের কমান্ড চালানো হয়।

উদাহরণ:

set day "Tuesday"
switch $day {
    "Monday" { puts "Start of the workweek" }
    "Tuesday" { puts "Second day of the workweek" }
    "Wednesday" { puts "Midweek" }
    "Thursday" { puts "Almost Friday" }
    "Friday" { puts "Last day of the workweek" }
    default { puts "Weekend!" }
}

এখানে, $day এর মান "Tuesday", তাই আউটপুট হবে:

Second day of the workweek

৫. ব্রেক ব্যবহার

switch স্টেটমেন্টে break ব্যবহার করা সম্ভব নয়, কারণ এটি স্বয়ংক্রিয়ভাবে কেসগুলোর মধ্যে থেকে বের হয়ে যায় যখন মিল খুঁজে পায়।

৬. স্পেসিফিক প্যাটার্ন (Pattern Matching)

switch স্টেটমেন্টে প্যাটার্ন মেলানোর জন্য বেশ কিছু বিশেষ কিওয়ার্ড ব্যবহার করা যায়:

• -exact: প্যাটার্ন মেলা হলে সঠিক মানটি নির্বাচন করা হয়।
• -glob: গ্লোব প্যাটার্ন মেলানো হয় (যেমন *, ? ইত্যাদি ব্যবহার করা হয়)।
• -regexp: একটি নিয়মিত অভিব্যক্তি (Regular Expression) ব্যবহার করা হয়।

উদাহরণ (প্যাটার্ন মেলানো - glob):

set filename "example.txt"
switch -glob $filename {
    "*.txt" { puts "This is a text file." }
    "*.jpg" { puts "This is an image file." }
    default { puts "Unknown file type." }
}

এখানে, switch -glob ব্যবহার করে ফাইল এক্সটেনশন চেক করা হচ্ছে এবং তারপরে সংশ্লিষ্ট আউটপুট দেওয়া হচ্ছে।

উদাহরণ (প্যাটার্ন মেলানো - regexp):

set text "hello123"
switch -regexp $text {
    "hello[0-9]+" { puts "Text starts with 'hello' and is followed by numbers." }
    default { puts "Text doesn't match the pattern." }
}

এখানে, switch -regexp ব্যবহার করে "hello123" স্ট্রিংয়ের সাথে নিয়মিত অভিব্যক্তি মিলানো হচ্ছে এবং আউটপুট "Text starts with 'hello' and is followed by numbers." পাওয়া যাবে।

উপসংহার

টিসিএল-এর switch স্টেটমেন্ট একটি শক্তিশালী এবং কার্যকরী উপায় যাতে একাধিক শর্তের মধ্যে সহজেই সিদ্ধান্ত নেওয়া যায়। এটি if-else স্টেটমেন্টের তুলনায় পরিষ্কার এবং দ্রুত হয়, বিশেষত যখন একাধিক প্যাটার্ন এবং মান পরীক্ষা করতে হয়। exact, glob, এবং regexp প্যাটার্নের মাধ্যমে আপনি অনেক ধরনের শর্ত পরীক্ষা করতে পারেন। switch স্টেটমেন্ট ব্যবহার করার সময় এটি কোডের পাঠযোগ্যতা এবং কার্যকারিতা বাড়ায়।

টিসিএল (Tcl) - লুপস: for, while, এবং foreach লুপ

টিসিএল (Tcl) ভাষায় লুপ ব্যবহার করা হয় নির্দিষ্ট সংখ্যক পুনরাবৃত্তি বা শর্ত পূর্ণ হওয়ার আগ পর্যন্ত কোড এক্সিকিউট করার জন্য। টিসিএল-এ তিনটি প্রধান ধরনের লুপ রয়েছে:

• for লুপ
• while লুপ
• foreach লুপ

এখানে প্রতিটি লুপের গঠন, ব্যবহার এবং বিভিন্ন উদাহরণ নিয়ে আলোচনা করা হলো।

১. for লুপ

for লুপ সাধারণত একটি নির্দিষ্ট সংখ্যক পুনরাবৃত্তি বা স্লটের জন্য ব্যবহৃত হয়। এটি শুরু, শর্ত এবং ইঙ্ক্রিমেন্ট বা ডিক্রিমেন্ট অংশ নিয়ে গঠিত হয়।

for লুপের সাধারণ সিনট্যাক্স:

for {initialization} {condition} {increment} {
    # Loop body
}

• initialization: লুপ শুরু হওয়ার সময় ভেরিয়েবলের মান সেট করা।
• condition: শর্ত যা সঠিক হওয়া পর্যন্ত লুপ চলবে।
• increment: প্রতি লুপ শেষে ভেরিয়েবলের মান বাড়ানো বা কমানো।

উদাহরণ:

for {set i 0} {$i < 5} {incr i} {
    puts "Iteration $i"
}

এখানে:

• লুপের শুরুতে i এর মান ০ হবে।
• শর্ত হচ্ছে $i < 5।
• প্রতি ইটারেশনে i এর মান ১ বাড়ানো হবে (incr i)।

• আউটপুট হবে:

  Iteration 0
  Iteration 1
  Iteration 2
  Iteration 3
  Iteration 4

২. while লুপ

while লুপ একটি শর্ত পূর্ণ না হওয়া পর্যন্ত চলতে থাকে। এটি একটি শর্ত নিয়ে কাজ করে এবং যতক্ষণ না শর্ত মিথ্যা হয়, ততক্ষণ কোডের ব্লকটি এক্সিকিউট হয়।

while লুপের সাধারণ সিনট্যাক্স:

while {condition} {
    # Loop body
}

• condition: শর্ত যা সত্য হওয়ার আগ পর্যন্ত লুপ চলবে।

উদাহরণ:

set i 0
while {$i < 5} {
    puts "Iteration $i"
    incr i
}

এখানে:

• শর্ত হচ্ছে $i < 5।
• প্রতি ইটারেশনে i এর মান ১ বাড়ানো হবে।

• আউটপুট হবে:

  Iteration 0
  Iteration 1
  Iteration 2
  Iteration 3
  Iteration 4

৩. foreach লুপ

foreach লুপ সাধারণত একটি লিস্ট বা অ্যারের উপাদানগুলোকে একটি একটি করে প্রসেস করার জন্য ব্যবহৃত হয়। এটি একটি বা একাধিক ভেরিয়েবল নিয়ে কাজ করে এবং প্রতিটি উপাদানকে একে একে প্রক্রিয়া করে।

foreach লুপের সাধারণ সিনট্যাক্স:

foreach elementList {
    # Loop body
}

• elementList: এটি এক বা একাধিক ভেরিয়েবল বা লিস্ট হতে পারে যা লুপে ব্যবহৃত হবে।

উদাহরণ ১ (একটি লিস্টের উপাদান দিয়ে):

set fruits {apple banana orange}
foreach fruit $fruits {
    puts "Fruit: $fruit"
}

এখানে, লিস্ট fruits এর প্রতিটি উপাদান এক এক করে fruit ভেরিয়েবলে রাখা হবে, এবং লুপ চলতে থাকবে। আউটপুট হবে:

Fruit: apple
Fruit: banana
Fruit: orange

উদাহরণ ২ (একাধিক ভেরিয়েবল দিয়ে):

set numbers {1 2 3 4}
set words {one two three four}
foreach num $numbers word $words {
    puts "$num -> $word"
}

এখানে, দুটি আলাদা লিস্ট numbers এবং words একসাথে ব্যবহৃত হয়েছে। আউটপুট হবে:

1 -> one
2 -> two
3 -> three
4 -> four

৪. লুপ ব্রেকিং (Loop Breaking)

টিসিএল-এ লুপের মধ্যে break কমান্ড ব্যবহার করে আপনি কোনো লুপ থেকে বেরিয়ে আসতে পারেন। এটি নির্দিষ্ট শর্তে লুপকে থামানোর জন্য ব্যবহার করা হয়।

উদাহরণ:

for {set i 0} {$i < 10} {incr i} {
    if {$i == 5} {
        break  ;# লুপ থামিয়ে দেবে যখন i ৫ হবে
    }
    puts "Iteration $i"
}

এখানে, লুপটি i এর মান ৫ হওয়ার পর থেমে যাবে এবং আউটপুট হবে:

Iteration 0
Iteration 1
Iteration 2
Iteration 3
Iteration 4

৫. লুপ কন্টিনিউ (Loop Continue)

টিসিএল-এ লুপের মধ্যে continue কমান্ড ব্যবহার করে আপনি বর্তমান ইটারেশন বাদ দিয়ে পরবর্তী ইটারেশনে চলে যেতে পারেন।

উদাহরণ:

for {set i 0} {$i < 5} {incr i} {
    if {$i == 3} {
        continue  ;# বর্তমান ইটারেশন বাদ দিয়ে পরবর্তী ইটারেশনে যাবে
    }
    puts "Iteration $i"
}

এখানে, i == 3 হওয়া পর্যন্ত লুপ চলবে, তবে i == 3 হওয়ার সময় সেটি skip হবে এবং আউটপুট হবে:

Iteration 0
Iteration 1
Iteration 2
Iteration 4

উপসংহার

টিসিএল-এ লুপ ব্যবহারের মাধ্যমে আপনি সহজে পুনরাবৃত্তি কার্য সম্পাদন করতে পারেন। for লুপটি নির্দিষ্ট সংখ্যক পুনরাবৃত্তির জন্য ব্যবহার হয়, while লুপটি একটি শর্ত মেনে চলতে থাকে, এবং foreach লুপটি লিস্ট বা অ্যারের উপাদানগুলো প্রসেস করার জন্য উপযুক্ত। লুপগুলোর মধ্যে break এবং continue কন্ট্রোল ফ্লো কমান্ডের মাধ্যমে আপনি লুপ পরিচালনা করতে পারবেন, যেমন লুপ থামানো বা লুপের একে একে ইটারেশন প্রক্রিয়া চলমান রাখা।

টিসিএল (Tcl) - লুপ কন্ট্রোল: break, continue, এবং return

টিসিএল (Tcl) এ লুপ কন্ট্রোল স্টেটমেন্টগুলি যেমন break, continue, এবং return ব্যবহৃত হয় লুপ এবং ফাংশনের প্রবাহ নিয়ন্ত্রণ করতে। এই স্টেটমেন্টগুলির মাধ্যমে আপনি নির্দিষ্ট শর্ত পূরণ হলে লুপ থেকে বেরিয়ে আসতে, লুপের পরবর্তী ইটারেশন এ যেতে অথবা ফাংশন থেকে বের হয়ে যেতে পারেন। নিচে প্রতিটি কন্ট্রোল স্টেটমেন্টের ব্যবহার এবং উদাহরণ দেওয়া হলো।

১. break - লুপ থেকে বাহির হওয়া

break স্টেটমেন্টটি ব্যবহার করা হয় লুপের কার্যক্রম শেষ করার জন্য, অর্থাৎ লুপ চলতে থাকা অবস্থায় শর্ত পূর্ণ হলে লুপ থেকে বের হয়ে যেতে। এটি সাধারণত ব্যবহার করা হয় যখন আপনি একটি নির্দিষ্ট শর্ত পূর্ণ হওয়ার পর লুপটি বন্ধ করতে চান।

উদাহরণ:

for {set i 0} {$i < 10} {incr i} {
    if {$i == 5} {
        break  ;# যখন i 5 হয়, লুপটি থামিয়ে দেওয়া হবে
    }
    puts $i
}

এখানে, i যখন 5 হয়, তখন break স্টেটমেন্টটি কার্যকর হবে এবং লুপটি থেমে যাবে, ফলে আউটপুট হবে:

0
1
2
3
4

২. continue - পরবর্তী লুপ ইটারেশনে যাওয়া

continue স্টেটমেন্টটি ব্যবহার করা হয় লুপের বর্তমান ইটারেশন এড়িয়ে পরবর্তী ইটারেশনে চলে যেতে। এটি সাধারণত ব্যবহার করা হয় যখন আপনি কিছু শর্ত পূর্ণ হলে লুপের বাকি অংশটি বাদ দিতে চান এবং পরবর্তী ইটারেশনে যেতে চান।

উদাহরণ:

for {set i 0} {$i < 10} {incr i} {
    if {$i % 2 == 0} {
        continue  ;# যখন i জোড় সংখ্যা হয়, তখন পরবর্তী ইটারেশনে চলে যাবে
    }
    puts $i
}

এখানে, continue স্টেটমেন্টটি ব্যবহার করা হয়েছে যাতে শুধুমাত্র বিজোড় সংখ্যা প্রিন্ট হয়। আউটপুট হবে:

1
3
5
7
9

৩. return - ফাংশন থেকে বাহির হওয়া

return স্টেটমেন্টটি একটি ফাংশন থেকে বাহির হয়ে আসার জন্য ব্যবহৃত হয় এবং প্রক্রিয়াটি বন্ধ করে দেয়। এটি সাধারণত ফাংশনের execution শেষ করার জন্য অথবা কোনো শর্ত পূর্ণ হলে ফাংশন থেকে রিটার্ন করার জন্য ব্যবহার করা হয়।

উদাহরণ:

proc checkNumber {num} {
    if {$num < 0} {
        return "Negative number"  ;# যদি সংখ্যা ঋণাত্মক হয়, তাহলে ফাংশন থেকে বের হয়ে যাবে
    }
    return "Positive number"
}

set result [checkNumber -5]
puts $result  ;# আউটপুট: Negative number

set result2 [checkNumber 10]
puts $result2 ;# আউটপুট: Positive number

এখানে, checkNumber ফাংশনটি সংখ্যার ধরণ চেক করে এবং যদি সংখ্যা ঋণাত্মক হয়, তাহলে return স্টেটমেন্টটি ফাংশনটিকে বন্ধ করে দেয় এবং "Negative number" রিটার্ন করে।

৪. break, continue, এবং return একসাথে ব্যবহার

কখনও কখনও, আপনি একই সময়ে break, continue, এবং return স্টেটমেন্টগুলিকে ব্যবহার করতে পারেন ফাংশন বা লুপের বিভিন্ন অংশে প্রবাহ নিয়ন্ত্রণ করার জন্য।

উদাহরণ:

proc processNumbers {nums} {
    foreach num $nums {
        if {$num < 0} {
            return "Negative number encountered"  ;# যদি কোনো ঋণাত্মক সংখ্যা পাওয়া যায়, ফাংশন থামবে
        }
        if {$num == 0} {
            continue  ;# যদি সংখ্যা শূন্য হয়, পরবর্তী সংখ্যা পরীক্ষা করবে
        }
        puts "Processing $num"
    }
    return "All numbers processed"
}

set result [processNumbers {1 2 0 4 5}]
puts $result  ;# আউটপুট: Processing 1, Processing 2, All numbers processed

এখানে, ফাংশনটি প্রথমে ঋণাত্মক সংখ্যা পাওয়ার পর থেমে যাবে এবং সেই সঙ্গে শূন্য পাওয়ার পর পরবর্তী সংখ্যায় চলে যাবে।

উপসংহার

• break স্টেটমেন্টটি ব্যবহৃত হয় লুপের কার্যক্রম শেষ করার জন্য।
• continue স্টেটমেন্টটি ব্যবহৃত হয় বর্তমান লুপের ইটারেশন বাদ দিয়ে পরবর্তী ইটারেশনে চলে যেতে।
• return স্টেটমেন্টটি ব্যবহৃত হয় ফাংশন থেকে বাহির হয়ে আসতে।

এই লুপ কন্ট্রোল স্টেটমেন্টগুলি টিসিএল স্ক্রিপ্টে ফ্লো নিয়ন্ত্রণ করতে সাহায্য করে এবং কোডের কার্যকারিতা ও পারফরম্যান্সকে উন্নত করে।