warn 'scalar ', /(\S+)\s+(\S+)/;
warn 'list ', join '|', /(\S+)\s+(\S+)/;