Select Code to Download

use strict;
use warnings;
...
    print "present value of the number is: $number\n";
    $number++;
}