$ perl -E 'for( my $i=0; $i<10; $i++ ){say "Inside loop: $i";} say "Outside loop: $i";' Inside loop: 0 Inside loop: 1 Inside loop: 2 Inside loop: 3 Inside loop: 4 Inside loop: 5 Inside loop: 6 Inside loop: 7 Inside loop: 8 Inside loop: 9 Outside loop: #### ... Inside loop: 9 Use of uninitialized value $i in concatenation (.) or string at -e line 1. Outside loop: