#!/usr/bin/perl -w print STDERR "Making HTML title and paragrafs tags... \n"; while(<>){ s@^\s+?$@\n

@g; print; } BEGIN { print < \t \t END_OF_BEGIN } END{ print < END_OF_END } #