#!/usr/bin/perl -w use strict; my $input; $/ = "\n\n"; $input = ; print "You said:\n$input\n";