I0, you're slipping. Should have cleaned up the @{$ref}{qw/LastName/} to be $ref->{LastName} while you were at it. {grin}

-- Randal L. Schwartz, Perl hacker