D:\PerlMonks>scope5-win.pl
 Inside:  test1 = [1]  test2 = [2]
Outside:  test1 = [1]  test2 = [2]

D:\PerlMonks>