Help for this page
#! perl -slw use strict; ... and a third name, and address fourth name, fourth address
C:\test>junk4 $VAR1 = { ... 'another name' => ' and another address, also with commas ' };