#!/usr/bin/env perl
use strict;
use warnings;
print "Content-Type: text/custom\n\r\n\r";
print "--- $_" while <STDIN>;
