do 
{
   $i=0;
   print"the value of i inside the loop is :$i\n";
   $i++;
}until($i<=10)


##</code><code>##

use strict;
my $i=5;
do
{
   print"the value of i is :$i\n";
   $i--;
}until($i<=0);
 

##</code><code>##

use strict;
my $i=5;
print "the value of i outside the loop is $i\n";
do
{
   print"now i entered inside the loop \n";
   my $i=10;
   print "the value of i inside the loop is :$i\n";
   $i--;
}until($i<=0);