#!/usr/bin/perl #---------------------------------------------------------------------- use CGI; $query = new CGI; print $query->header; $|=0; #----------------------------------------------------------------------- $unixPath = "/home/ohainaut/public_html"; $htmlPath = "http://www.sc.eso.org/~ohainaut"; $dirPath = "bin"; $file = astrolabe; #- print the main page foreach $i (`cat $unixPath/$dirPath/$file.html`) { print $i; }