use strict;
use warnings;


my $number=8;
no strict; # could have also used "no strict vars"
$i=0;   #if i remove my keyword it gives error (not now)
for($i=0;$i<20;$i++)
use strict; # back to strict
{
        print "present value of the number is:";
        print $number++;
        print "\n";
}