#!/usr/local/bin/perl
# this program reads a line of input, and writes the line
# back out
$inputline = <STDIN>;    # read a line of input
print( $inputline );     # write the line out
