my @locations= ( [ source => 'D:\\dev' ], [ docs => 'D:\\My Documents' ], [ source => 'F:\\dev' ], [ docs => 'F:\\Documents' ], [ norule => 'D:\\Program Files\\util'] ); #### [ qw ( -this -that 5 6 -other /path/etc/foo ) ], #### [ '-this', [ that => 5, 6 ], '-other', '/path/etc/foo' ],