D:\PerlMonks>scope4-fail.pl
 Inside:  test1 = [1]  test2 = [2]
Use of uninitialized value $test2 in concatenation (.) or string at D:\PerlMonks\scope4-fail.pl
line 10.
Outside:  test1 = [1]  test2 = []

D:\PerlMonks>