use vars '@ary';
@ary = (
  rec_length  => 'A4',
  fname       => 'A20',
  lname       => 'A20',
);