function getElementsByTagName (theTagName) {
  var all = document.all;

  if (!all)
    return [];
    
  var length = all.length;
  var elements = [];
  var tagName = theTagName.toLowerCase();
  
  for (var i = 0; i < length; i++)
    if (all[i].tagName.toLowerCase() == tagName)
      elements.push(all[i]);

  return elements;
}

if (!document.getElementsByTagName)
  document.getElementsByTagName = getElementsByTagName;

function getLinks () {
  
  // Return an array of HTML links
  // based on the head LINK tags
  // stylesheets discarded
  
  var links = document.getElementsByTagName ("link");
  var result = [];
  
  for (var i = 0; i < links.length; i++) {
    var l = links[i];
    if (l.rel.toLowerCase().indexOf("stylesheet") == -1)   // discard stylesheet links
      result.push((l.title || l.rel || l.href).link(l.href));
  }
  return result;
}

function showLinks () {
  var links = getLinks();
  if (links.length > 0)
    return "<ul><li>" + links.join("<li>") + "</ul>";
}

document.write(showLinks() || '');