#!/usr/bin/perl
printf("generating vindex.html ");
`echo "" > vindex.html`;
`echo "" >> vindex.html`;
`echo "Index of Lightvectors" >> vindex.html`;
`echo "" >> vindex.html`;
`echo "" >> vindex.html`;
`echo "Dusting Convocation Hall
" >> vindex.html`;
`echo "http://wearcam.org/ece1766/lightspace/dusting/
" >> vindex.html`;
`echo "" >> vindex.html`;
`echo "![]()
" >> vindex.html`;
`echo "Index of Lightvectors
" >> vindex.html`;
#for ($counter=0; $counter<=999; $counter++) {
while (defined($nextname = )) {
# $filev = sprintf("v%03d.jpg", $counter);
$filev = $nextname;
# $files = sprintf("s%03d.jpg", $counter);
$files = sprintf("s%s", $nextname);
# printf("creating html link for file $filev\n");
printf("creating html link for file $nextname\n");
#`echo "![](\\"$files\\")
" >> vindex.html`;
# `echo "" >> vindex.html`;
`echo "$filev" >> vindex.html`;
}
`echo "
" >> vindex.html`;
`date >> vindex.html`;
`echo "" >> vindex.html`;
`echo "" >> vindex.html`;
`echo "" >> vindex.html`;