#!/usr/bin/perl system "ls >temp.txt"; open INPUT, "index.html"; print OUTPUT < A. V. Gerbessiotis: CS Department Standards Commitee : Documents

List of Documents

    XENDEND while (){ chop($_); print OUTPUT < $_. ZENDEND } print OUTPUT < YENDEND close INPUT; exit(0);