functions/convert_to_rname.pp


1
2
3
4
5
6
7
8
9
10

# Converts regular email addresses to dns format
function dns::convert_to_rname(String $x) >> String {
  $s = if $x =~ /([^@]*)@(.*)/ {
    "${1}.${2}"
  } else {
    $x
  }

  dns::ensure_ending_period($s)
}