Transform string in a slug

function make_slug( $str, $trim = 40 ) {
  $replace = array(
    'À'=>'A', 'Á'=>'A', 'Â'=>'A', 'Ã'=>'A', 'Ä'=>'Ae', 'Å'=>'A', 'Æ'=>'A', 'Ă'=>'A', 'Ą' => 'A', 'ą' => 'a',
    'à'=>'a', 'á'=>'a', 'â'=>'a', 'ã'=>'a', 'ä'=>'ae', 'å'=>'a', 'ă'=>'a', 'æ'=>'ae',
    'þ'=>'b', 'Þ'=>'B',
    'Ç'=>'C', 'ç'=>'c', 'Ć' => 'C', 'ć' => 'c',
    'È'=>'E', 'É'=>'E', 'Ê'=>'E', 'Ë'=>'E', 'Ę' => 'E', 'ę' => 'e',
    'è'=>'e', 'é'=>'e', 'ê'=>'e', 'ë'=>'e',
    'Ğ'=>'G', 'ğ'=>'g',
    'Ì'=>'I', 'Í'=>'I', 'Î'=>'I', 'Ï'=>'I', 'İ'=>'I', 'ı'=>'i', 'ì'=>'i', 'í'=>'i', 'î'=>'i', 'ï'=>'i',
    'Ł' => 'L', 'ł' => 'l',
    'Ñ'=>'N', 'Ń' => 'N', 'ń' => 'n',
    'Ò'=>'O', 'Ó'=>'O', 'Ô'=>'O', 'Õ'=>'O', 'Ö'=>'Oe', 'Ø'=>'O', 'ö'=>'oe', 'ø'=>'o',
    'ð'=>'o', 'ñ'=>'n', 'ò'=>'o', 'ó'=>'o', 'ô'=>'o', 'õ'=>'o',
    'Š'=>'S', 'š'=>'s', 'Ş'=>'S', 'ș'=>'s', 'Ș'=>'S', 'ş'=>'s', 'ß'=>'ss', 'Ś' => 'S', 'ś' => 's',
    'ț'=>'t', 'Ț'=>'T',
    'Ù'=>'U', 'Ú'=>'U', 'Û'=>'U', 'Ü'=>'Ue',
    'ù'=>'u', 'ú'=>'u', 'û'=>'u', 'ü'=>'ue',
    'Ý'=>'Y',
    'ý'=>'y', 'ý'=>'y', 'ÿ'=>'y',
    'Ž'=>'Z', 'ž'=>'z', 'Ż' => 'Z', 'ż' => 'z', 'Ź' => 'Z', 'ź' => 'z'
  );

  $str = preg_replace( '~[^a-zA-Z0-9]+~', '-', strtolower( strtr( str_replace( ' ', '-', $str ), $replace ) ) );
  return ( $trim > -1 && strlen( $str ) > $trim ? rtrim( substr( $str, 0, 40 ), '-' ) : $str );
}