#!/usr/bin/perl print < chiark public CVS

chiark users' public CVS

$user" or die $!; print " (homepage)" or die $! if -d "/home/$user/public-html"; print ":" or die $!; $hd= 1; } else { print "," or die $!; } print " $mod" or die $!; } next unless $hd; print "

END exit 0