map results from the CPAN

ASP4
  }
  
  UL LI A {
    border-right: solid 2px #FF0000;
    padding-left: 10px;
    display: block;
    clear: both;
    color: #FF0000;
  }
  
  UL LI A:hover {
    background-color: #EFEFEF;
    color: #000000;
    border-right: solid 2px #000000;
  }
  
  #contents {
    float: left;
    width: 740px;
    padding: 5px;
    background-color: #FFFFFF;
  }
  
  PRE {
    background-color: lightyellow;
    height: 300px;
    overflow: auto;
    padding: 5px;
    border: solid 1px #CCCCCC;
  }

  </style>
</head>
<body>
<div id="header">
  <div id="header-container">
<%
  require ASP4;
%>
    ASP4 v<%= $ASP4::VERSION %> Installed // Date: <%= scalar(localtime(time)) %>
  </div>
</div>
<div id="container">
  <div id="leftnav">
    <ul>
      <li class="active"><a href="">Home</a></li>
      <li><a href="http://search.cpan.org/dist/ASP4/">ASP4 Documentation</a></li>
      <li><a href="http://www.cpanforum.com/dist/ASP4">ASP4 Forum</a></li>
      <li><a href="http://rt.cpan.org/Public/Dist/Display.html?Name=ASP4">ASP4 Bug Tracker</a></li>
      <li><a href="http://www.devstack.com/">ASP4 Developer</a></li>
    </ul>
    <div class="clear"></div>
  </div>
  <div id="contents">
    <h2>ASP4 Is Running on this Server</h2>
    <p>
      For more information about ASP4, please used the links provided on the left.
    </p>
    <p>
      <b>Loaded ASP4 Modules:</b>
      <pre><%= join "\n", map { $_ =~ s{/}{::}g; $_ =~ s/\.pm$//; $_ } sort grep { m{^ASP4/} } keys %INC %></pre>
    </p>
  </div>
</div>
</body>
</html>
( run in 0.647 second using v1.01-cache-2.11-cpan-39bf76dae61 )