my ($pass) = $_ =~ m/password\s*?:\s+([^\s]+)/s;