#!/usr/bin/perl -w

use strict;


my @wiki = <>;

my $wiki = join '', @wiki;

my $newline = "\262";

$wiki =~ s/\n/$newline/gs;

print<<EOF;
version=chris autowiki
newline=$newline
time=1112826235
text=$wiki
targets=
author=autowiki
name=test
host=127.0.0.1
agent=perl
rev=1
EOF