#!/usr/bin/perl
#: put a blank line after each line of input
#==============================================================================
# Last Modified Time-stamp: "2010-11-09 06:15:20 AKST sburke@cpan.org"

use strict; use warnings;
while(<>) { print $_, "\n" }