P:\test>test2
P:\test>test2
$VAR1 = {
          'Paterman_S' => {
                            'email' => 'steve@net.net',
                            'first' => 'Steve',
                            'last' => 'Paterman',
                            'title' => 'Mr',
                            'phone' => '100',
                            'room' => '101'
                          },
          'Caralo_L' => {
                          'email' => 'she@borg.org',
                          'first' => 'Linda',
                          'last' => 'Caralo',
                          'title' => 'Mrs',
                          'phone' => '148',
                          'room' => '201'
                        },
          'Androno_J' => {
                           'email' => 'j@alo.com',
                           'first' => 'Jean',
                           'last' => 'Androno',
                           'title' => 'Miss',
                           'phone' => '167',
                           'room' => '317'
                         }
        };