devi@27: #!/usr/bin/perl
devi@27: 
devi@27: use strict;
devi@27: use CGI qw(:standard);
devi@27: 
devi@27: my $value = param('PARAM');
devi@27: 
devi@27: print header(
devi@27: 		-charset => "utf-8", 
devi@27: 		);
devi@27: chdir("/home/devi/cvs/lilalo");
devi@27: open (FRONTEND, "./l3-frontend --output - |");
devi@27: while (<FRONTEND>) {
devi@27: 	print;
devi@27: }
devi@27: close(FRONTEND);
devi@27: