perl -MCGI=:standard -e"print header, html({-title=>'My Files'}, map{ a({href=>$_},$_).br().$/} <$ARGV[0]>);" *