$line =~ /^r\s(.*?)\s\s\s\s\s(.*?)\s(.*?)$/;