title: Perl: file protocol
body: <p>Here is my subroutine. But when I click on hyperlink it doesn't do anything while my expectation is to open the file it points. </p>
  
  <pre><code> my $q= new CGI;
    my $tablecontent=[$q-&gt;th(['Date', 'Count'])];
    for (sort keys %data) {
      push @$tablecontent,  $q-&gt;td([ $_, qq{&lt;a href="file://home/niraj/apache2/log_files/result.$_"&gt;$data{$_}} ]) ;
    }
    print $q-&gt;table( { border =&gt; 1, -width =&gt; '20%'},
                     $q-&gt;Tr( $tablecontent),
                   );
  </code></pre>