my ( $key, $val ) = /^(\d+)\s+(\w+)/;