#!/usr/bin/perl -w

use strict;

while (<STDIN>) {
    print "You entered: ";
    print;
}