BEGIN:VCALENDAR
VERSION:2.0
X-WR-CALNAME:source2html
X-WR-CALDESC: I needed to print out a directory full of small scripts. This Perl script will go through the current directory and create a pretty HTML page of all the files in that directory. That HTML page can then be fed to a browser for printing.  #!/usr/bin/perl  $cd = `pwd`; chomp $cd; $ls = `ls -1 $cd`; @ls = split(/\n/,$ls);  print "<title>Directory Listing $cd</title>\n"; print "<h1>Directory Listing $cd</h1>\n";  $ll = `ls -l '$cd'`; chomp $ll; print "<pre style='padding:1em'><b>$ll</b></pre>\n\n";  foreach $f (@ls) {    if (!(-d $f)) {      $l = `ls -l '$f'`; chomp $l;     print "<div style='border:2px solid black;padding:1em;'>\n";     print "<h2 style='margin:0;padding:0;'>$f</h2>\n";     print "<pre><b>$l</b></pre>\n";     print "</div>\n";      $t = `cat '$f'`;     $t =~ s/&/&/g;     $t =~ s/</</g;     $t =~ s/>/>/g;      print "<pre style='padding:1em'>$t</pre>\n\n";    }  }  This software is distributed under the terms of the GNU GPL.  
END:VCALENDAR