send syslog with powershell

send-syslog.ps1

Function Send-Syslog {
  [CmdletBinding()]
  param(
    [Parameter(Mandatory=$true)]                          [string]$ServerName,
    [Parameter(Mandatory=$false)]                         [string]$Severity = '1',
    [Parameter(Mandatory=$false)]                         [string]$Facility = '22',
    [Parameter(Mandatory=$false)]                         [string]$HostName = $env:COMPUTERNAME,
    [Parameter(Mandatory=$false, ValueFromPipeline=$true)][string]$Message  = 'From Powershell'
  )
  $Priority = ([int]$Facility * 8) + [int]$Severity
  $Timestamp = Get-Date -Format "MMM dd HH:mm:ss"
  $FullSyslogMessage = "<{0}>{1} {2} {3}" -f $Priority, $Timestamp, $HostName, $Message
  $Encoding = [System.Text.Encoding]::ASCII
  $ByteSyslogMessage = $Encoding.GetBytes($FullSyslogMessage)
  $UDPClient = New-Object System.Net.Sockets.UdpClient
  $UDPClient.Connect($ServerName, 514)
  $UDPClient.Send($ByteSyslogMessage, $ByteSyslogMessage.Length)
}