https://script.spoken-tutorial.org/index.php?action=history&feed=atom&title=PERL%2FC2%2Fwhile-do-while-loops%2FEnglish
PERL/C2/while-do-while-loops/English - Revision history
2026-04-11T22:25:48Z
Revision history for this page on the wiki
MediaWiki 1.23.17
https://script.spoken-tutorial.org/index.php?title=PERL/C2/while-do-while-loops/English&diff=11361&oldid=prev
PoojaMoolya at 07:29, 17 June 2014
2014-06-17T07:29:30Z
<p></p>
<table class='diff diff-contentalign-left'>
<col class='diff-marker' />
<col class='diff-content' />
<col class='diff-marker' />
<col class='diff-content' />
<tr style='vertical-align: top;'>
<td colspan='2' style="background-color: white; color:black; text-align: center;">← Older revision</td>
<td colspan='2' style="background-color: white; color:black; text-align: center;">Revision as of 07:29, 17 June 2014</td>
</tr><tr><td colspan="2" class="diff-lineno">Line 8:</td>
<td colspan="2" class="diff-lineno">Line 8:</td></tr>
<tr><td class='diff-marker'> </td><td style="background-color: #f9f9f9; color: #333333; font-size: 88%; border-style: solid; border-width: 1px 1px 1px 4px; border-radius: 0.33em; border-color: #e6e6e6; vertical-align: top; white-space: pre-wrap;"></td><td class='diff-marker'> </td><td style="background-color: #f9f9f9; color: #333333; font-size: 88%; border-style: solid; border-width: 1px 1px 1px 4px; border-radius: 0.33em; border-color: #e6e6e6; vertical-align: top; white-space: pre-wrap;"></td></tr>
<tr><td class='diff-marker'> </td><td style="background-color: #f9f9f9; color: #333333; font-size: 88%; border-style: solid; border-width: 1px 1px 1px 4px; border-radius: 0.33em; border-color: #e6e6e6; vertical-align: top; white-space: pre-wrap;"><div>{| style="border-spacing:0;"</div></td><td class='diff-marker'> </td><td style="background-color: #f9f9f9; color: #333333; font-size: 88%; border-style: solid; border-width: 1px 1px 1px 4px; border-radius: 0.33em; border-color: #e6e6e6; vertical-align: top; white-space: pre-wrap;"><div>{| style="border-spacing:0;"</div></td></tr>
<tr><td class='diff-marker'>−</td><td style="color:black; font-size: 88%; border-style: solid; border-width: 1px 1px 1px 4px; border-radius: 0.33em; border-color: #ffe49c; vertical-align: top; white-space: pre-wrap;"><div>| style="border-top:0.05pt solid #000000;border-bottom:0.05pt solid #000000;border-left:0.05pt solid #000000;border-right:none;padding:0.097cm;"| <center>'''Visual <del class="diffchange diffchange-inline">Clue</del>'''</center></div></td><td class='diff-marker'>+</td><td style="color:black; font-size: 88%; border-style: solid; border-width: 1px 1px 1px 4px; border-radius: 0.33em; border-color: #a3d3ff; vertical-align: top; white-space: pre-wrap;"><div>| style="border-top:0.05pt solid #000000;border-bottom:0.05pt solid #000000;border-left:0.05pt solid #000000;border-right:none;padding:0.097cm;"| <center>'''Visual <ins class="diffchange diffchange-inline">Cue</ins>'''</center></div></td></tr>
<tr><td class='diff-marker'> </td><td style="background-color: #f9f9f9; color: #333333; font-size: 88%; border-style: solid; border-width: 1px 1px 1px 4px; border-radius: 0.33em; border-color: #e6e6e6; vertical-align: top; white-space: pre-wrap;"><div>| style="border:0.05pt solid #000000;padding:0.097cm;"| <center>'''Narration'''</center></div></td><td class='diff-marker'> </td><td style="background-color: #f9f9f9; color: #333333; font-size: 88%; border-style: solid; border-width: 1px 1px 1px 4px; border-radius: 0.33em; border-color: #e6e6e6; vertical-align: top; white-space: pre-wrap;"><div>| style="border:0.05pt solid #000000;padding:0.097cm;"| <center>'''Narration'''</center></div></td></tr>
<tr><td class='diff-marker'> </td><td style="background-color: #f9f9f9; color: #333333; font-size: 88%; border-style: solid; border-width: 1px 1px 1px 4px; border-radius: 0.33em; border-color: #e6e6e6; vertical-align: top; white-space: pre-wrap;"></td><td class='diff-marker'> </td><td style="background-color: #f9f9f9; color: #333333; font-size: 88%; border-style: solid; border-width: 1px 1px 1px 4px; border-radius: 0.33em; border-color: #e6e6e6; vertical-align: top; white-space: pre-wrap;"></td></tr>
</table>
PoojaMoolya
https://script.spoken-tutorial.org/index.php?title=PERL/C2/while-do-while-loops/English&diff=3682&oldid=prev
Sneha at 10:05, 15 April 2013
2013-04-15T10:05:36Z
<p></p>
<table class='diff diff-contentalign-left'>
<col class='diff-marker' />
<col class='diff-content' />
<col class='diff-marker' />
<col class='diff-content' />
<tr style='vertical-align: top;'>
<td colspan='2' style="background-color: white; color:black; text-align: center;">← Older revision</td>
<td colspan='2' style="background-color: white; color:black; text-align: center;">Revision as of 10:05, 15 April 2013</td>
</tr><tr><td colspan="2" class="diff-lineno">Line 175:</td>
<td colspan="2" class="diff-lineno">Line 175:</td></tr>
<tr><td class='diff-marker'> </td><td style="background-color: #f9f9f9; color: #333333; font-size: 88%; border-style: solid; border-width: 1px 1px 1px 4px; border-radius: 0.33em; border-color: #e6e6e6; vertical-align: top; white-space: pre-wrap;"></td><td class='diff-marker'> </td><td style="background-color: #f9f9f9; color: #333333; font-size: 88%; border-style: solid; border-width: 1px 1px 1px 4px; border-radius: 0.33em; border-color: #e6e6e6; vertical-align: top; white-space: pre-wrap;"></td></tr>
<tr><td class='diff-marker'> </td><td style="background-color: #f9f9f9; color: #333333; font-size: 88%; border-style: solid; border-width: 1px 1px 1px 4px; border-radius: 0.33em; border-color: #e6e6e6; vertical-align: top; white-space: pre-wrap;"></td><td class='diff-marker'> </td><td style="background-color: #f9f9f9; color: #333333; font-size: 88%; border-style: solid; border-width: 1px 1px 1px 4px; border-radius: 0.33em; border-color: #e6e6e6; vertical-align: top; white-space: pre-wrap;"></td></tr>
<tr><td class='diff-marker'>−</td><td style="color:black; font-size: 88%; border-style: solid; border-width: 1px 1px 1px 4px; border-radius: 0.33em; border-color: #ffe49c; vertical-align: top; white-space: pre-wrap;"><div>| style="border-top:none;border-bottom:0.05pt solid #000000;border-left:0.05pt solid #000000;border-right:0.05pt solid #000000;padding:0.097cm;"| Then the '''$i++''' increments the value of variable '''i '''by one.</div></td><td class='diff-marker'>+</td><td style="color:black; font-size: 88%; border-style: solid; border-width: 1px 1px 1px 4px; border-radius: 0.33em; border-color: #a3d3ff; vertical-align: top; white-space: pre-wrap;"><div>| style="border-top:none;border-bottom:0.05pt solid #000000;border-left:0.05pt solid #000000;border-right:0.05pt solid #000000;padding:0.097cm;"| Then the '''$i++'''<ins class="diffchange diffchange-inline">will </ins>increments the value of variable '''i '''by one.</div></td></tr>
<tr><td class='diff-marker'> </td><td style="background-color: #f9f9f9; color: #333333; font-size: 88%; border-style: solid; border-width: 1px 1px 1px 4px; border-radius: 0.33em; border-color: #e6e6e6; vertical-align: top; white-space: pre-wrap;"></td><td class='diff-marker'> </td><td style="background-color: #f9f9f9; color: #333333; font-size: 88%; border-style: solid; border-width: 1px 1px 1px 4px; border-radius: 0.33em; border-color: #e6e6e6; vertical-align: top; white-space: pre-wrap;"></td></tr>
<tr><td class='diff-marker'> </td><td style="background-color: #f9f9f9; color: #333333; font-size: 88%; border-style: solid; border-width: 1px 1px 1px 4px; border-radius: 0.33em; border-color: #e6e6e6; vertical-align: top; white-space: pre-wrap;"><div>|-</div></td><td class='diff-marker'> </td><td style="background-color: #f9f9f9; color: #333333; font-size: 88%; border-style: solid; border-width: 1px 1px 1px 4px; border-radius: 0.33em; border-color: #e6e6e6; vertical-align: top; white-space: pre-wrap;"><div>|-</div></td></tr>
<tr><td colspan="2" class="diff-lineno">Line 222:</td>
<td colspan="2" class="diff-lineno">Line 222:</td></tr>
<tr><td class='diff-marker'> </td><td style="background-color: #f9f9f9; color: #333333; font-size: 88%; border-style: solid; border-width: 1px 1px 1px 4px; border-radius: 0.33em; border-color: #e6e6e6; vertical-align: top; white-space: pre-wrap;"></td><td class='diff-marker'> </td><td style="background-color: #f9f9f9; color: #333333; font-size: 88%; border-style: solid; border-width: 1px 1px 1px 4px; border-radius: 0.33em; border-color: #e6e6e6; vertical-align: top; white-space: pre-wrap;"></td></tr>
<tr><td class='diff-marker'> </td><td style="background-color: #f9f9f9; color: #333333; font-size: 88%; border-style: solid; border-width: 1px 1px 1px 4px; border-radius: 0.33em; border-color: #e6e6e6; vertical-align: top; white-space: pre-wrap;"><div>'''perl whileLoop.pl'''</div></td><td class='diff-marker'> </td><td style="background-color: #f9f9f9; color: #333333; font-size: 88%; border-style: solid; border-width: 1px 1px 1px 4px; border-radius: 0.33em; border-color: #e6e6e6; vertical-align: top; white-space: pre-wrap;"><div>'''perl whileLoop.pl'''</div></td></tr>
<tr><td class='diff-marker'>−</td><td style="color:black; font-size: 88%; border-style: solid; border-width: 1px 1px 1px 4px; border-radius: 0.33em; border-color: #ffe49c; vertical-align: top; white-space: pre-wrap;"><div>| style="border-top:none;border-bottom:0.05pt solid #000000;border-left:0.05pt solid #000000;border-right:0.05pt solid #000000;padding:0.097cm;"| As there <del class="diffchange diffchange-inline">are </del>no compilation or syntax error, we will execute the '''Perl''' script by typing -</div></td><td class='diff-marker'>+</td><td style="color:black; font-size: 88%; border-style: solid; border-width: 1px 1px 1px 4px; border-radius: 0.33em; border-color: #a3d3ff; vertical-align: top; white-space: pre-wrap;"><div>| style="border-top:none;border-bottom:0.05pt solid #000000;border-left:0.05pt solid #000000;border-right:0.05pt solid #000000;padding:0.097cm;"| As there <ins class="diffchange diffchange-inline">isF </ins>no compilation or syntax error, we will execute the '''Perl''' script by typing -</div></td></tr>
<tr><td class='diff-marker'> </td><td style="background-color: #f9f9f9; color: #333333; font-size: 88%; border-style: solid; border-width: 1px 1px 1px 4px; border-radius: 0.33em; border-color: #e6e6e6; vertical-align: top; white-space: pre-wrap;"></td><td class='diff-marker'> </td><td style="background-color: #f9f9f9; color: #333333; font-size: 88%; border-style: solid; border-width: 1px 1px 1px 4px; border-radius: 0.33em; border-color: #e6e6e6; vertical-align: top; white-space: pre-wrap;"></td></tr>
<tr><td class='diff-marker'> </td><td style="background-color: #f9f9f9; color: #333333; font-size: 88%; border-style: solid; border-width: 1px 1px 1px 4px; border-radius: 0.33em; border-color: #e6e6e6; vertical-align: top; white-space: pre-wrap;"></td><td class='diff-marker'> </td><td style="background-color: #f9f9f9; color: #333333; font-size: 88%; border-style: solid; border-width: 1px 1px 1px 4px; border-radius: 0.33em; border-color: #e6e6e6; vertical-align: top; white-space: pre-wrap;"></td></tr>
<tr><td colspan="2" class="diff-lineno">Line 517:</td>
<td colspan="2" class="diff-lineno">Line 517:</td></tr>
<tr><td class='diff-marker'> </td><td style="background-color: #f9f9f9; color: #333333; font-size: 88%; border-style: solid; border-width: 1px 1px 1px 4px; border-radius: 0.33em; border-color: #e6e6e6; vertical-align: top; white-space: pre-wrap;"></td><td class='diff-marker'> </td><td style="background-color: #f9f9f9; color: #333333; font-size: 88%; border-style: solid; border-width: 1px 1px 1px 4px; border-radius: 0.33em; border-color: #e6e6e6; vertical-align: top; white-space: pre-wrap;"></td></tr>
<tr><td class='diff-marker'> </td><td style="background-color: #f9f9f9; color: #333333; font-size: 88%; border-style: solid; border-width: 1px 1px 1px 4px; border-radius: 0.33em; border-color: #e6e6e6; vertical-align: top; white-space: pre-wrap;"></td><td class='diff-marker'> </td><td style="background-color: #f9f9f9; color: #333333; font-size: 88%; border-style: solid; border-width: 1px 1px 1px 4px; border-radius: 0.33em; border-color: #e6e6e6; vertical-align: top; white-space: pre-wrap;"></td></tr>
<tr><td class='diff-marker'>−</td><td style="color:black; font-size: 88%; border-style: solid; border-width: 1px 1px 1px 4px; border-radius: 0.33em; border-color: #ffe49c; vertical-align: top; white-space: pre-wrap;"><div>| style="border-top:none;border-bottom:0.05pt solid #000000;border-left:0.05pt solid #000000;border-right:0.05pt solid #000000;padding:0.097cm;"| <del class="diffchange diffchange-inline">In </del>the '''do...while''' loop''',''' we are first executing the code and then checking the condition.</div></td><td class='diff-marker'>+</td><td style="color:black; font-size: 88%; border-style: solid; border-width: 1px 1px 1px 4px; border-radius: 0.33em; border-color: #a3d3ff; vertical-align: top; white-space: pre-wrap;"><div>| style="border-top:none;border-bottom:0.05pt solid #000000;border-left:0.05pt solid #000000;border-right:0.05pt solid #000000;padding:0.097cm;"| <ins class="diffchange diffchange-inline">Then </ins>the '''do...while''' loop''',''' we are first executing the code and then checking the condition.</div></td></tr>
<tr><td class='diff-marker'> </td><td style="background-color: #f9f9f9; color: #333333; font-size: 88%; border-style: solid; border-width: 1px 1px 1px 4px; border-radius: 0.33em; border-color: #e6e6e6; vertical-align: top; white-space: pre-wrap;"></td><td class='diff-marker'> </td><td style="background-color: #f9f9f9; color: #333333; font-size: 88%; border-style: solid; border-width: 1px 1px 1px 4px; border-radius: 0.33em; border-color: #e6e6e6; vertical-align: top; white-space: pre-wrap;"></td></tr>
<tr><td class='diff-marker'> </td><td style="background-color: #f9f9f9; color: #333333; font-size: 88%; border-style: solid; border-width: 1px 1px 1px 4px; border-radius: 0.33em; border-color: #e6e6e6; vertical-align: top; white-space: pre-wrap;"><div>|-</div></td><td class='diff-marker'> </td><td style="background-color: #f9f9f9; color: #333333; font-size: 88%; border-style: solid; border-width: 1px 1px 1px 4px; border-radius: 0.33em; border-color: #e6e6e6; vertical-align: top; white-space: pre-wrap;"><div>|-</div></td></tr>
</table>
Sneha
https://script.spoken-tutorial.org/index.php?title=PERL/C2/while-do-while-loops/English&diff=3445&oldid=prev
AmolBrahmankar: Created page with ''''Title Of Script: '''while and do-while loops in Perl '''Author:''' Amol Brahmankar '''Keywords:''' Loops in Perl, while loop in perl, do-while loop in perl, video tutorial. …'
2013-03-23T11:11:47Z
<p>Created page with ''''Title Of Script: '''while and do-while loops in Perl '''Author:''' Amol Brahmankar '''Keywords:''' Loops in Perl, while loop in perl, do-while loop in perl, video tutorial. …'</p>
<p><b>New page</b></p><div>'''Title Of Script: '''while and do-while loops in Perl<br />
<br />
'''Author:''' Amol Brahmankar<br />
<br />
'''Keywords:''' Loops in Perl, while loop in perl, do-while loop in perl, video tutorial.<br />
<br />
<br />
<br />
{| style="border-spacing:0;"<br />
| style="border-top:0.05pt solid #000000;border-bottom:0.05pt solid #000000;border-left:0.05pt solid #000000;border-right:none;padding:0.097cm;"| <center>'''Visual Clue'''</center><br />
| style="border:0.05pt solid #000000;padding:0.097cm;"| <center>'''Narration'''</center><br />
<br />
|-<br />
| style="border-top:none;border-bottom:0.05pt solid #000000;border-left:0.05pt solid #000000;border-right:none;padding:0.097cm;"| Slide<br />
| style="border-top:none;border-bottom:0.05pt solid #000000;border-left:0.05pt solid #000000;border-right:0.05pt solid #000000;padding:0.097cm;"| Welcome to the spoken tutorial on '''while and do-while '''loops in '''Perl'''<br />
<br />
|-<br />
| style="border-top:none;border-bottom:0.05pt solid #000000;border-left:0.05pt solid #000000;border-right:none;padding:0.097cm;"| Slide: Learning Objectives<br />
| style="border-top:none;border-bottom:0.05pt solid #000000;border-left:0.05pt solid #000000;border-right:0.05pt solid #000000;padding:0.097cm;"| In this tutorial, we will learn about;<br />
<br />
'''while '''loop in '''Perl'''<br />
<br />
'''do-while '''loop in '''Perl'''<br />
<br />
|-<br />
| style="border-top:none;border-bottom:0.05pt solid #000000;border-left:0.05pt solid #000000;border-right:none;padding:0.097cm;"| Slide: System Requirements<br />
| style="border-top:none;border-bottom:0.05pt solid #000000;border-left:0.05pt solid #000000;border-right:0.05pt solid #000000;padding:0.097cm;"| I am using '''Ubuntu Linux12.04''' operating system and '''Perl 5.14.2'''<br />
<br />
<br />
I will also be using the '''gedit '''Text Editor.<br />
<br />
<br />
You can use any text editor of your choice.<br />
<br />
|-<br />
| style="border-top:none;border-bottom:0.05pt solid #000000;border-left:0.05pt solid #000000;border-right:none;padding:0.097cm;"| Slide: Prerequisites<br />
| style="border-top:none;border-bottom:0.05pt solid #000000;border-left:0.05pt solid #000000;border-right:0.05pt solid #000000;padding:0.097cm;"| You should have basic knowledge of '''Variables '''and''' Comments '''in''' Perl'''<br />
<br />
<br />
Knowledge of '''for '''and '''foreach '''loops in '''Perl '''will be an added advantage'''.'''<br />
<br />
<br />
Please go through the relevant spoken tutorials on the '''spoken tutorial '''website.<br />
<br />
|-<br />
| style="border-top:none;border-bottom:0.05pt solid #000000;border-left:0.05pt solid #000000;border-right:none;padding:0.097cm;"| Slide<br />
| style="border-top:none;border-bottom:0.05pt solid #000000;border-left:0.05pt solid #000000;border-right:0.05pt solid #000000;padding:0.097cm;"| '''while '''loop in '''Perl'''<br />
<br />
<br />
The '''while''' loop executes a block of code while a condition is true.<br />
<br />
|-<br />
| style="border-top:none;border-bottom:0.05pt solid #000000;border-left:0.05pt solid #000000;border-right:none;padding:0.097cm;"| Slide<br />
<br />
<br />
'''while (condition) {'''<br />
<br />
'''Piece of code to be executed while the condition is true'''<br />
<br />
'''}'''<br />
| style="border-top:none;border-bottom:0.05pt solid #000000;border-left:0.05pt solid #000000;border-right:0.05pt solid #000000;padding:0.097cm;"| The syntax of '''while''' loop is as follows -<br />
<br />
<br />
'''while space '''open bracket''' condition''' close bracket<br />
<br />
<br />
Open curly bracket <br />
<br />
<br />
Piece of code to be executed while the condition is true<br />
<br />
<br />
Close curly bracket<br />
<br />
|-<br />
| style="border-top:none;border-bottom:0.05pt solid #000000;border-left:0.05pt solid #000000;border-right:none;padding:0.097cm;"| Highlight '''while (condition)'''<br />
| style="border-top:none;border-bottom:0.05pt solid #000000;border-left:0.05pt solid #000000;border-right:0.05pt solid #000000;padding:0.097cm;"| So, what happens if the condition is not satisfied? Then, the '''while''' loop will exit, without executing the code within, even once.<br />
<br />
|-<br />
| style="border-top:none;border-bottom:0.05pt solid #000000;border-left:0.05pt solid #000000;border-right:none;padding:0.097cm;"| <br />
| style="border-top:none;border-bottom:0.05pt solid #000000;border-left:0.05pt solid #000000;border-right:0.05pt solid #000000;padding:0.097cm;"| Now let us look at an example of '''while''' loop.<br />
<br />
|-<br />
| style="border-top:none;border-bottom:0.05pt solid #000000;border-left:0.05pt solid #000000;border-right:none;padding:0.097cm;"| Switch to the Terminal and type<br />
<br />
<br />
'''gedit whileLoop.pl &'''<br />
<br />
<br />
and press '''Enter'''.<br />
| style="border-top:none;border-bottom:0.05pt solid #000000;border-left:0.05pt solid #000000;border-right:0.05pt solid #000000;padding:0.097cm;"| Open the '''Terminal''' and type<br />
<br />
<br />
'''gedit whileLoop dot pl space ampersand'''<br />
<br />
<br />
and press''' Enter'''<br />
<br />
|-<br />
| style="border-top:none;border-bottom:0.05pt solid #000000;border-left:0.05pt solid #000000;border-right:none;padding:0.097cm;"| Point to the filename '''whileLoop'''.'''pl''' in the Titlebar of gedit.<br />
<br />
<br />
Type the piece of code.<br />
<br />
<br />
'''<nowiki>#!/usr/bin/perl</nowiki>'''<br />
<br />
<br />
'''$i = 0;'''<br />
<br />
'''<nowiki>while ($i<=4) {</nowiki>'''<br />
<br />
'''print “Value of i: $i\n”;'''<br />
<br />
'''$i++;'''<br />
<br />
'''}'''<br />
<br />
<br />
<br />
| style="border-top:none;border-bottom:0.05pt solid #000000;border-left:0.05pt solid #000000;border-right:0.05pt solid #000000;padding:0.097cm;"| This will open the '''whileLoop'''.'''pl''' file in '''gedit'''.<br />
<br />
<br />
Now Type the following code<br />
<br />
<br />
'''hash exclamation mark slash u s r slash bin slash perl'''<br />
<br />
<br />
Press '''Enter.'''<br />
<br />
<br />
'''dollar i''' is equal to zero '''semicolon'''<br />
<br />
Press '''Enter'''<br />
<br />
<br />
'''while''' open bracket dollar i less than or equal to four close bracket space<br />
<br />
<br />
Open curly bracket press enter and type<br />
<br />
<br />
'''print''' space double quote Value of i colon space dollar i '''slash n doule '''quote complete '''semicolon'''<br />
<br />
Press '''Enter'''<br />
<br />
<br />
'''dollar i plus plus semicolon'''<br />
<br />
press enter and<br />
<br />
Close the curly bracket<br />
<br />
|-<br />
| style="border-top:none;border-bottom:0.05pt solid #000000;border-left:0.05pt solid #000000;border-right:none;padding:0.097cm;"| '''Highlight $i=0;'''<br />
| style="border-top:none;border-bottom:0.05pt solid #000000;border-left:0.05pt solid #000000;border-right:0.05pt solid #000000;padding:0.097cm;"| Let me explain the '''while''' loop in detail.<br />
<br />
<br />
We have initialized the variable''' i''' to 0. <br />
<br />
|-<br />
| style="border-top:none;border-bottom:0.05pt solid #000000;border-left:0.05pt solid #000000;border-right:none;padding:0.097cm;"| <br />
| style="border-top:none;border-bottom:0.05pt solid #000000;border-left:0.05pt solid #000000;border-right:0.05pt solid #000000;padding:0.097cm;"| Now we have specified the condition for '''while''' loop as '''$i '''less than or equal to 4. <br />
<br />
If the '''condition''' is true, the code within the '''while''' loop will get executed.<br />
<br />
|-<br />
| style="border-top:none;border-bottom:0.05pt solid #000000;border-left:0.05pt solid #000000;border-right:none;padding:0.097cm;"| '''Highlight print'''<br />
| style="border-top:none;border-bottom:0.05pt solid #000000;border-left:0.05pt solid #000000;border-right:0.05pt solid #000000;padding:0.097cm;"| This means, first time our '''while''' loop will print ''''Value of i: 0' '''on the '''terminal'''.<br />
<br />
|-<br />
| style="border-top:none;border-bottom:0.05pt solid #000000;border-left:0.05pt solid #000000;border-right:none;padding:0.097cm;"| '''Highlight $i++'''<br />
<br />
<br />
<br />
| style="border-top:none;border-bottom:0.05pt solid #000000;border-left:0.05pt solid #000000;border-right:0.05pt solid #000000;padding:0.097cm;"| Then the '''$i++''' increments the value of variable '''i '''by one.<br />
<br />
|-<br />
| style="border-top:none;border-bottom:0.05pt solid #000000;border-left:0.05pt solid #000000;border-right:none;padding:0.097cm;"| <br />
| style="border-top:none;border-bottom:0.05pt solid #000000;border-left:0.05pt solid #000000;border-right:0.05pt solid #000000;padding:0.097cm;"| Now again, the loop condition '''<nowiki>$i<=4</nowiki>''' will be evaluated.<br />
<br />
<br />
And the loop will exit once the value of''' i''' becomes 5.<br />
<br />
|-<br />
| style="border-top:none;border-bottom:0.05pt solid #000000;border-left:0.05pt solid #000000;border-right:none;padding:0.097cm;"| <br />
| style="border-top:none;border-bottom:0.05pt solid #000000;border-left:0.05pt solid #000000;border-right:0.05pt solid #000000;padding:0.097cm;"| In this case, '''while''' loop will get executed for''' i''' equal to 0, 1, 2, 3, 4.<br />
<br />
|-<br />
| style="border-top:none;border-bottom:0.05pt solid #000000;border-left:0.05pt solid #000000;border-right:none;padding:0.097cm;"| Press '''Ctrl S'''<br />
| style="border-top:none;border-bottom:0.05pt solid #000000;border-left:0.05pt solid #000000;border-right:0.05pt solid #000000;padding:0.097cm;"| Press '''ctrl+s''' to '''save''' the file.<br />
<br />
|-<br />
| style="border-top:none;border-bottom:0.05pt solid #000000;border-left:0.05pt solid #000000;border-right:none;padding:0.097cm;"| Switch to terminal<br />
| style="border-top:none;border-bottom:0.05pt solid #000000;border-left:0.05pt solid #000000;border-right:0.05pt solid #000000;padding:0.097cm;"| Now, switch to the '''terminal'''.<br />
<br />
|-<br />
| style="border-top:none;border-bottom:0.05pt solid #000000;border-left:0.05pt solid #000000;border-right:none;padding:0.097cm;"| '''perl -c whileLoop.pl'''<br />
<br />
<br />
<br />
| style="border-top:none;border-bottom:0.05pt solid #000000;border-left:0.05pt solid #000000;border-right:0.05pt solid #000000;padding:0.097cm;"| Type the following to check for any compilation or syntax error -<br />
<br />
<br />
'''perl hyphen c whileLoop dot pl'''<br />
<br />
<br />
and press''' Enter.'''<br />
<br />
|-<br />
| style="border-top:none;border-bottom:0.05pt solid #000000;border-left:0.05pt solid #000000;border-right:none;padding:0.097cm;"| Highlight the below line on terminal-<br />
<br />
'''whileLoop.pl syntax OK'''<br />
| style="border-top:none;border-bottom:0.05pt solid #000000;border-left:0.05pt solid #000000;border-right:0.05pt solid #000000;padding:0.097cm;"| The following line will be displayed on the terminal <br />
<br />
'''whileLoop.pl syntax OK'''<br />
<br />
|-<br />
| style="border-top:none;border-bottom:0.05pt solid #000000;border-left:0.05pt solid #000000;border-right:none;padding:0.097cm;"| Execute Perl script<br />
<br />
<br />
'''perl whileLoop.pl'''<br />
| style="border-top:none;border-bottom:0.05pt solid #000000;border-left:0.05pt solid #000000;border-right:0.05pt solid #000000;padding:0.097cm;"| As there are no compilation or syntax error, we will execute the '''Perl''' script by typing -<br />
<br />
<br />
'''perl whileLoop dot pl'''<br />
<br />
<br />
and press '''Enter'''<br />
<br />
|-<br />
| style="border-top:none;border-bottom:0.05pt solid #000000;border-left:0.05pt solid #000000;border-right:none;padding:0.097cm;"| Highlight the output of the perl script on terminal<br />
<br />
'''Value of i: 0'''<br />
<br />
'''Value of i: 1'''<br />
<br />
'''Value of i: 2'''<br />
<br />
'''Value of i: 3'''<br />
<br />
'''Value of i: 4'''<br />
| style="border-top:none;border-bottom:0.05pt solid #000000;border-left:0.05pt solid #000000;border-right:0.05pt solid #000000;padding:0.097cm;"| The following output will be displayed on the '''terminal'''.<br />
<br />
<br />
<br />
<br />
|-<br />
| style="border-top:none;border-bottom:0.05pt solid #000000;border-left:0.05pt solid #000000;border-right:none;padding:0.097cm;"| <br />
| style="border-top:none;border-bottom:0.05pt solid #000000;border-left:0.05pt solid #000000;border-right:0.05pt solid #000000;padding:0.097cm;"| Now, let us look at '''do-while loop'''<br />
<br />
|-<br />
| style="border-top:none;border-bottom:0.05pt solid #000000;border-left:0.05pt solid #000000;border-right:none;padding:0.097cm;"| Slide<br />
| style="border-top:none;border-bottom:0.05pt solid #000000;border-left:0.05pt solid #000000;border-right:0.05pt solid #000000;padding:0.097cm;"| The '''do...while''' statement will always execute the piece of code at-least once.<br />
<br />
<br />
It will then check the '''condition''' and repeat the loop while the '''condition''' is true.<br />
<br />
|-<br />
| style="border-top:none;border-bottom:0.05pt solid #000000;border-left:0.05pt solid #000000;border-right:none;padding:0.097cm;"| Slide<br />
<br />
<br />
'''do {'''<br />
<br />
'''Piece of code to be executed while the condition is true'''<br />
<br />
'''} while (condition);'''<br />
| style="border-top:none;border-bottom:0.05pt solid #000000;border-left:0.05pt solid #000000;border-right:0.05pt solid #000000;padding:0.097cm;"| The syntax for '''do-while '''loop is as follows -<br />
<br />
<br />
'''do '''space<br />
<br />
open curly bracket<br />
<br />
Piece of code to be executed while the '''condition''' is true<br />
<br />
close curly bracket then space<br />
<br />
'''while '''space within brackets '''condition''' and then '''semicolon'''<br />
<br />
<br />
<br />
<br />
|-<br />
| style="border-top:none;border-bottom:0.05pt solid #000000;border-left:0.05pt solid #000000;border-right:none;padding:0.097cm;"| Switch to the Terminal and type<br />
<br />
<br />
'''gedit doWhileLoop.pl &'''<br />
<br />
<br />
and press '''Enter'''.<br />
| style="border-top:none;border-bottom:0.05pt solid #000000;border-left:0.05pt solid #000000;border-right:0.05pt solid #000000;padding:0.097cm;"| Open the '''Terminal''' and type;<br />
<br />
<br />
'''gedit doWhileLoop dot pl space ampersand'''<br />
<br />
<br />
and then press''' Enter'''<br />
<br />
|-<br />
| style="border-top:none;border-bottom:0.05pt solid #000000;border-left:0.05pt solid #000000;border-right:none;padding:0.097cm;"| Point to the filename '''doWhileLoop'''.'''pl''' in the Titlebar of gedit.<br />
| style="border-top:none;border-bottom:0.05pt solid #000000;border-left:0.05pt solid #000000;border-right:0.05pt solid #000000;padding:0.097cm;"| This will open the '''doWhileLoop'''.'''pl''' file in '''gedit'''.<br />
<br />
|-<br />
| style="border-top:none;border-bottom:0.05pt solid #000000;border-left:0.05pt solid #000000;border-right:none;padding:0.097cm;"| Type the piece of code and '''save''' the file<br />
<br />
<br />
'''<nowiki>#!/usr/bin/perl</nowiki>'''<br />
<br />
<br />
'''$i = 0;'''<br />
<br />
<br />
'''do {'''<br />
<br />
'''print “Value of i: $i\n”;'''<br />
<br />
'''$i++;'''<br />
<br />
'''<nowiki>} while ($i<=4);</nowiki>'''<br />
<br />
<br />
<br />
| style="border-top:none;border-bottom:0.05pt solid #000000;border-left:0.05pt solid #000000;border-right:0.05pt solid #000000;padding:0.097cm;"| Type the following piece of code -<br />
<br />
<br />
'''hash exclamation mark slash u s r slash bin slash perl'''<br />
<br />
<br />
Press '''Enter'''<br />
<br />
<br />
'''dollar i equals to zero semicolon press enter'''<br />
<br />
'''do space'''<br />
<br />
open curly bracket enter type<br />
<br />
'''print space double''' quote''' Value of i colon space dollar i slash n''' double quote complete '''semicolon'''<br />
<br />
Press '''Enter'''<br />
<br />
<br />
'''dollar i plus plus semicolon'''<br />
<br />
'''press enter'''<br />
<br />
close curly bracket <br />
<br />
space '''while space '''open bracket '''dollar i less than or equal to four '''<br />
<br />
close bracket '''semicolon'''<br />
<br />
|-<br />
| style="border-top:none;border-bottom:0.05pt solid #000000;border-left:0.05pt solid #000000;border-right:none;padding:0.097cm;"| '''Highlight $i=0;'''<br />
| style="border-top:none;border-bottom:0.05pt solid #000000;border-left:0.05pt solid #000000;border-right:0.05pt solid #000000;padding:0.097cm;"| Here is the detail explanation of a '''do-while''' loop.<br />
<br />
We have initialized the variable''' i''' to 0.<br />
<br />
|-<br />
| style="border-top:none;border-bottom:0.05pt solid #000000;border-left:0.05pt solid #000000;border-right:none;padding:0.097cm;"| '''Highlight print'''<br />
| style="border-top:none;border-bottom:0.05pt solid #000000;border-left:0.05pt solid #000000;border-right:0.05pt solid #000000;padding:0.097cm;"| First time, the '''do-while''' loop will print the output as ''''Value of i colon 0'''' <br />
<br />
<br />
without checking for '''condition'''<br />
<br />
|-<br />
| style="border-top:none;border-bottom:0.05pt solid #000000;border-left:0.05pt solid #000000;border-right:none;padding:0.097cm;"| '''Highlight $i++;'''<br />
| style="border-top:none;border-bottom:0.05pt solid #000000;border-left:0.05pt solid #000000;border-right:0.05pt solid #000000;padding:0.097cm;"| '''$i++''' will increment the value of variable''' i '''by one each time loop gets executed.<br />
<br />
|-<br />
| style="border-top:none;border-bottom:0.05pt solid #000000;border-left:0.05pt solid #000000;border-right:none;padding:0.097cm;"| <br />
| style="border-top:none;border-bottom:0.05pt solid #000000;border-left:0.05pt solid #000000;border-right:0.05pt solid #000000;padding:0.097cm;"| Second time, the condition''' $i''' less than or equal to 4 will be checked. <br />
<br />
<br />
If the '''condition''' is true, the loop will get executed again.<br />
<br />
<br />
In our case, second time the output displayed on '''terminal''' will be ''''Value of I colon 1'.'''<br />
<br />
|-<br />
| style="border-top:none;border-bottom:0.05pt solid #000000;border-left:0.05pt solid #000000;border-right:none;padding:0.097cm;"| <br />
| style="border-top:none;border-bottom:0.05pt solid #000000;border-left:0.05pt solid #000000;border-right:0.05pt solid #000000;padding:0.097cm;"| The loop will get executed till the '''condition''' becomes false that is when variable''' i '''becomes 5.<br />
<br />
|-<br />
| style="border-top:none;border-bottom:0.05pt solid #000000;border-left:0.05pt solid #000000;border-right:none;padding:0.097cm;"| Press '''Ctrl+S'''<br />
| style="border-top:none;border-bottom:0.05pt solid #000000;border-left:0.05pt solid #000000;border-right:0.05pt solid #000000;padding:0.097cm;"| Press '''ctrl+s''' to '''save''' the file.<br />
<br />
|-<br />
| style="border-top:none;border-bottom:0.05pt solid #000000;border-left:0.05pt solid #000000;border-right:none;padding:0.097cm;"| Switch to terminal<br />
<br />
<br />
'''perl -c doWhileLoop.pl'''<br />
<br />
<br />
<br />
| style="border-top:none;border-bottom:0.05pt solid #000000;border-left:0.05pt solid #000000;border-right:0.05pt solid #000000;padding:0.097cm;"| Now, switch to '''terminal''' and type the following to check for any compilation or syntax error.<br />
<br />
<br />
'''perl hyphen c doWhileLoop dot pl'''<br />
<br />
<br />
and press''' Enter.'''<br />
<br />
|-<br />
| style="border-top:none;border-bottom:0.05pt solid #000000;border-left:0.05pt solid #000000;border-right:none;padding:0.097cm;"| Highlight the below line on terminal -<br />
<br />
'''doWhileLoop.pl syntax OK'''<br />
| style="border-top:none;border-bottom:0.05pt solid #000000;border-left:0.05pt solid #000000;border-right:0.05pt solid #000000;padding:0.097cm;"| The following line will be displayed on the '''terminal''' <br />
<br />
'''doWhileLoop.pl syntax OK'''<br />
<br />
|-<br />
| style="border-top:none;border-bottom:0.05pt solid #000000;border-left:0.05pt solid #000000;border-right:none;padding:0.097cm;"| Execute Perl script<br />
<br />
<br />
'''perl doWhileLoop.pl'''<br />
| style="border-top:none;border-bottom:0.05pt solid #000000;border-left:0.05pt solid #000000;border-right:0.05pt solid #000000;padding:0.097cm;"| As there are no compilation or syntax errors, we will now execute the '''Perl''' script.<br />
<br />
<br />
Type<br />
<br />
<br />
'''perl doWhileLoop dot pl'''<br />
<br />
<br />
and press '''Enter'''<br />
<br />
|-<br />
| style="border-top:none;border-bottom:0.05pt solid #000000;border-left:0.05pt solid #000000;border-right:none;padding:0.097cm;"| Highlight the output of the perl script on terminal<br />
<br />
'''Value of i: 0'''<br />
<br />
'''Value of i: 1'''<br />
<br />
'''Value of i: 2'''<br />
<br />
'''Value of i: 3'''<br />
<br />
'''Value of i: 4'''<br />
| style="border-top:none;border-bottom:0.05pt solid #000000;border-left:0.05pt solid #000000;border-right:0.05pt solid #000000;padding:0.097cm;"| The following output will be displayed on the '''terminal'''.<br />
<br />
<br />
<br />
<br />
|-<br />
| style="border-top:none;border-bottom:0.05pt solid #000000;border-left:0.05pt solid #000000;border-right:none;padding:0.097cm;"| <br />
| style="border-top:none;border-bottom:0.05pt solid #000000;border-left:0.05pt solid #000000;border-right:0.05pt solid #000000;padding:0.097cm;"| Now, let us see the actual difference between '''while''' and '''do-while''' loops.<br />
<br />
|-<br />
| style="border-top:none;border-bottom:0.05pt solid #000000;border-left:0.05pt solid #000000;border-right:none;padding:0.097cm;"| Switch to the Terminal and type<br />
<br />
<br />
'''gedit loop.pl &'''<br />
<br />
<br />
and press '''Enter'''.<br />
| style="border-top:none;border-bottom:0.05pt solid #000000;border-left:0.05pt solid #000000;border-right:0.05pt solid #000000;padding:0.097cm;"| Open the '''Terminal''' and type -<br />
<br />
<br />
'''gedit loop dot pl space ampersand'''<br />
<br />
<br />
and press''' Enter'''<br />
<br />
|-<br />
| style="border-top:none;border-bottom:0.05pt solid #000000;border-left:0.05pt solid #000000;border-right:none;padding:0.097cm;"| '''<nowiki>#!/usr/bin/perl</nowiki>'''<br />
<br />
<br />
'''$count = 0;'''<br />
<br />
'''<nowiki># while loop</nowiki>'''<br />
<br />
'''while ($count > 0) {'''<br />
<br />
'''print “I am in while loop\n”;'''<br />
<br />
'''}'''<br />
<br />
<br />
'''<nowiki># do-while loop</nowiki>'''<br />
<br />
'''do {'''<br />
<br />
'''print “I am in do-while loop\n”;'''<br />
<br />
'''} while ($count > 0);'''<br />
| style="border-top:none;border-bottom:0.05pt solid #000000;border-left:0.05pt solid #000000;border-right:0.05pt solid #000000;padding:0.097cm;"| This will open '''loop dot pl''' file in '''gedit'''.<br />
<br />
<br />
Now type the piece of code shown.<br />
<br />
<br />
<br />
<br />
|-<br />
| style="border-top:none;border-bottom:0.05pt solid #000000;border-left:0.05pt solid #000000;border-right:none;padding:0.097cm;"| Highlight<br />
<br />
'''$count = 0;'''<br />
| style="border-top:none;border-bottom:0.05pt solid #000000;border-left:0.05pt solid #000000;border-right:0.05pt solid #000000;padding:0.097cm;"| We have declared a variable '''count''' and initialized it to zero<br />
<br />
|-<br />
| style="border-top:none;border-bottom:0.05pt solid #000000;border-left:0.05pt solid #000000;border-right:none;padding:0.097cm;"| Highlight<br />
<br />
'''while ($count > 0)'''<br />
| style="border-top:none;border-bottom:0.05pt solid #000000;border-left:0.05pt solid #000000;border-right:0.05pt solid #000000;padding:0.097cm;"| In the '''while''' loop '''condition,''' we are checking if the variable '''count''' is greater than zero.<br />
<br />
<br />
The '''condition''' is not true. So, the '''while''' loop code will not be executed even once.<br />
<br />
|-<br />
| style="border-top:none;border-bottom:0.05pt solid #000000;border-left:0.05pt solid #000000;border-right:none;padding:0.097cm;"| Highlight<br />
<br />
'''do {'''<br />
<br />
<br />
<br />
| style="border-top:none;border-bottom:0.05pt solid #000000;border-left:0.05pt solid #000000;border-right:0.05pt solid #000000;padding:0.097cm;"| In the '''do...while''' loop''',''' we are first executing the code and then checking the condition.<br />
<br />
|-<br />
| style="border-top:none;border-bottom:0.05pt solid #000000;border-left:0.05pt solid #000000;border-right:none;padding:0.097cm;"| Highlight<br />
<br />
'''print “I am in do-while loop\n”;'''<br />
<br />
<br />
<br />
| style="border-top:none;border-bottom:0.05pt solid #000000;border-left:0.05pt solid #000000;border-right:0.05pt solid #000000;padding:0.097cm;"| So, the code will be executed at least once.<br />
<br />
|-<br />
| style="border-top:none;border-bottom:0.05pt solid #000000;border-left:0.05pt solid #000000;border-right:none;padding:0.097cm;"| Highlight<br />
<br />
'''} while ($count > 0);'''<br />
| style="border-top:none;border-bottom:0.05pt solid #000000;border-left:0.05pt solid #000000;border-right:0.05pt solid #000000;padding:0.097cm;"| Then the '''condition''' whether the variable '''count''' is greater than zero, is checked.<br />
<br />
|-<br />
| style="border-top:none;border-bottom:0.05pt solid #000000;border-left:0.05pt solid #000000;border-right:none;padding:0.097cm;"| <br />
| style="border-top:none;border-bottom:0.05pt solid #000000;border-left:0.05pt solid #000000;border-right:0.05pt solid #000000;padding:0.097cm;"| The '''condition''' is not true. So the loop will exit.<br />
<br />
|-<br />
| style="border-top:none;border-bottom:0.05pt solid #000000;border-left:0.05pt solid #000000;border-right:none;padding:0.097cm;"| Press '''Ctrl S'''<br />
| style="border-top:none;border-bottom:0.05pt solid #000000;border-left:0.05pt solid #000000;border-right:0.05pt solid #000000;padding:0.097cm;"| Now, press '''ctrl+s''' to save the file.<br />
<br />
|-<br />
| style="border-top:none;border-bottom:0.05pt solid #000000;border-left:0.05pt solid #000000;border-right:none;padding:0.097cm;"| Switch to terminal<br />
<br />
<br />
type '''perl -c loop.pl'''<br />
<br />
<br />
<br />
| style="border-top:none;border-bottom:0.05pt solid #000000;border-left:0.05pt solid #000000;border-right:0.05pt solid #000000;padding:0.097cm;"| Now, switch to terminal and type the following to check for any compilation or syntax errors<br />
<br />
<br />
'''perl hyphen c loop dot pl'''<br />
<br />
<br />
and press''' Enter.'''<br />
<br />
|-<br />
| style="border-top:none;border-bottom:0.05pt solid #000000;border-left:0.05pt solid #000000;border-right:none;padding:0.097cm;"| Highlight the below line on terminal;<br />
<br />
'''loop.pl syntax OK'''<br />
| style="border-top:none;border-bottom:0.05pt solid #000000;border-left:0.05pt solid #000000;border-right:0.05pt solid #000000;padding:0.097cm;"| The following line will be displayed on the terminal <br />
<br />
<br />
'''loop dot pl syntax OK'''<br />
<br />
|-<br />
| style="border-top:none;border-bottom:0.05pt solid #000000;border-left:0.05pt solid #000000;border-right:none;padding:0.097cm;"| Execute perl script<br />
<br />
<br />
'''perl loop.pl'''<br />
| style="border-top:none;border-bottom:0.05pt solid #000000;border-left:0.05pt solid #000000;border-right:0.05pt solid #000000;padding:0.097cm;"| As there are no compilation or syntax errors, let us execute the '''Perl''' script.<br />
<br />
By Typing<br />
<br />
<br />
'''perl loop dot pl'''<br />
<br />
<br />
and press '''Enter.'''<br />
<br />
|-<br />
| style="border-top:none;border-bottom:0.05pt solid #000000;border-left:0.05pt solid #000000;border-right:none;padding:0.097cm;"| Highlight the output of the perl script on terminal<br />
<br />
<br />
'''I am in do-while loop'''<br />
| style="border-top:none;border-bottom:0.05pt solid #000000;border-left:0.05pt solid #000000;border-right:0.05pt solid #000000;padding:0.097cm;"| The following output will be displayed on the terminal.<br />
<br />
<br />
'''I am in do-while loop'''<br />
<br />
|-<br />
| style="border-top:none;border-bottom:0.05pt solid #000000;border-left:0.05pt solid #000000;border-right:none;padding:0.097cm;"| <br />
| style="border-top:none;border-bottom:0.05pt solid #000000;border-left:0.05pt solid #000000;border-right:0.05pt solid #000000;padding:0.097cm;"| Here we can see, there is no output message displaying ''''I am in while loop'''' <br />
<br />
<br />
This message was what we printed inside the '''while''' loop.<br />
<br />
|-<br />
| style="border-top:none;border-bottom:0.05pt solid #000000;border-left:0.05pt solid #000000;border-right:none;padding:0.097cm;"| Slide<br />
| style="border-top:none;border-bottom:0.05pt solid #000000;border-left:0.05pt solid #000000;border-right:0.05pt solid #000000;padding:0.097cm;"| This implies that, <br />
<br />
<br />
'''do-while''' loop executes at-least once before evaluating the '''condition''' <br />
<br />
<br />
whereas '''while''' loop does not get executed even once when the '''condition''' specified is false.<br />
<br />
|-<br />
| style="border-top:none;border-bottom:0.05pt solid #000000;border-left:0.05pt solid #000000;border-right:none;padding:0.097cm;"| <br />
| style="border-top:none;border-bottom:0.05pt solid #000000;border-left:0.05pt solid #000000;border-right:0.05pt solid #000000;padding:0.097cm;"| I hope the difference is clear to you now. <br />
<br />
<br />
That's all there is to '''while''' and '''do-while''' loops.<br />
<br />
|-<br />
| style="border-top:none;border-bottom:0.05pt solid #000000;border-left:0.05pt solid #000000;border-right:none;padding:0.097cm;"| Summary<br />
| style="border-top:none;border-bottom:0.05pt solid #000000;border-left:0.05pt solid #000000;border-right:0.05pt solid #000000;padding:0.097cm;"| Let us summarize.<br />
<br />
In this tutorial, we have learnt -<br />
<br />
'''while''' loop and<br />
<br />
'''do-while''' loop in '''Perl'''<br />
<br />
using sample programs.<br />
<br />
|-<br />
| style="border-top:none;border-bottom:0.05pt solid #000000;border-left:0.05pt solid #000000;border-right:none;padding:0.097cm;"| Assignment<br />
| style="border-top:none;border-bottom:0.05pt solid #000000;border-left:0.05pt solid #000000;border-right:0.05pt solid #000000;padding:0.097cm;"| Here is assignment for you -<br />
<br />
<br />
Print ''''Hello Perl'''' <br />
<br />
till the count of variable reaches 10 <br />
<br />
by using '''while''' loop and '''do-while''' loops<br />
<br />
|-<br />
| style="border-top:none;border-bottom:0.05pt solid #000000;border-left:0.05pt solid #000000;border-right:none;padding:0.097cm;"| About the Project<br />
| style="border-top:none;border-bottom:0.05pt solid #000000;border-left:0.05pt solid #000000;border-right:0.05pt solid #000000;padding:0.097cm;"| Watch the video available at the following link<br />
<br />
<br />
It summaries the Spoken Tutorial project<br />
<br />
<br />
If you do not have good bandwidth, you can<br />
<br />
download and watch it<br />
<br />
|-<br />
| style="border-top:none;border-bottom:0.05pt solid #000000;border-left:0.05pt solid #000000;border-right:none;padding:0.097cm;"| Spoken Tutorial Workshops<br />
| style="border-top:none;border-bottom:0.05pt solid #000000;border-left:0.05pt solid #000000;border-right:0.05pt solid #000000;padding:0.097cm;"| The Spoken Tutorial Project Team <br />
<br />
<br />
Conducts workshops using spoken tutorials<br />
<br />
<br />
Gives certificates to those who pass an online <br />
<br />
test<br />
<br />
<br />
For more details, please write to<br />
<br />
contact at spoken hyphen tutorial dot org<br />
<br />
|-<br />
| style="border-top:none;border-bottom:0.05pt solid #000000;border-left:0.05pt solid #000000;border-right:none;padding:0.097cm;"| Acknowledgment<br />
<br />
<br />
http://spoken-tutorial.org\NMEICT-Intro<br />
| style="border-top:none;border-bottom:0.05pt solid #000000;border-left:0.05pt solid #000000;border-right:0.05pt solid #000000;padding:0.097cm;"| Spoken Tutorial Project is a part of the Talk to a <br />
<br />
Teacher project<br />
<br />
<br />
It is supported by the National Mission on<br />
<br />
Education through ICT, MHRD, Government of India.<br />
<br />
<br />
More information on this Mission is available<br />
<br />
spoken hypen tutorial dot org slash NMEICT hyphen Intro<br />
<br />
|-<br />
| style="border-top:none;border-bottom:0.05pt solid #000000;border-left:0.05pt solid #000000;border-right:none;padding:0.097cm;"| <br />
| style="border-top:none;border-bottom:0.05pt solid #000000;border-left:0.05pt solid #000000;border-right:0.05pt solid #000000;padding:0.097cm;"| Hope you enjoyed this '''Perl''' tutorial. <br />
<br />
This is Amol Brahmankar signing off.<br />
<br />
<br />
Thanks for joining<br />
<br />
|}</div>
AmolBrahmankar