%[
#!/usr/interp/perl -w

# PERL READING SCALARS FROM STDIN EXAMPLE
# By Louis Ziantz

# Description: This program is a demonstration reading scalar 
#             variables from STDIN.
# Procedure:   Two values are read from STDIN and they are echoed.
# Input:       Name (string) and age (number).
# Output:      Input is echo printed.

print "Enter first name: ";
$name = <STDIN>;
print "Enter age: ";
$age = <STDIN>;
print "$name is your name and you are $age years old.\n";
%]

