#!/usr/bin/env perl
use strict;
use warnings;


print "How about a line of input?: ";
my $inline = <STDIN>;

print "You said:\n";
print $inline;


1;
__END__