#!/usr/bin/perl

# $ApsCVS: www/wml/wml-import.pl,v 1.1.1.1 2000/07/28 22:02:55 andreas Exp $

while ($line = <>) {
    if ($line =~ m|^#include `(.*)`$|) {
        print qx/$1/;
    } else {         
        print $line;
    }               
}
1;