The code below produces the error: Can't use string ("1000") as a symbol ref while "strict refs" in use at junk.pl line 8. under 5.10 and 5.22.

I know how to work around it; but for the life of me I cannot see why I need to?

#! perl -slw
use strict;


my $i = 3;
my $n = 1000;

loop:

print $n +4;    #- 12;
print $n +8;    #-  8;
print $n +12;   #-  4;
print $n +16;   #-  0;

$n += 16;

goto loop if --$i;
[download]