sub validate_record_length {
  my ($args) = @_;
  ...