my @list= $obj->(qw/name address serial zip/);