sub increaseNumber {
    my $value = 001
    return $value + 1
}; 

##</code><code>##

my $value = 1;
sub increaseNumber {
    return ++$value;
};