# anon hash bracket \ # | # grouping bracket \ | # | | # V V print "$_\n" for keys %{ { returnlist() } }; sub returnlist { 1..10 }