my $value = 0;
my $range = 0;
my $phiApprox = 0;
my $i = 0;
my $temp = 0;
my $fibValue1 = 0;
my $fibValue2 = 0;

##</code><code>##

chomp(my $value = <>);


chomp(my $temp = <>);

my $range = $value + $temp;

my $total;

for (0 .. $range) {
  my $fibValue1 = fib($i);  
  my $fibValue2 = fib($i - 1);
  ...
  ...

  $total++;
}
##</code><code>##

use strict;
use warnings;
use 5.010;


my $total;
$total++;

say $total;

--output:--
1

##</code><code>##

use strict;
use warnings;
use 5.010;

my $total;

my $result = $total + 1;
say $result;

--output:--
Use of uninitialized value $total in addition (+) at 1perl.pl line 9.
1