#!/usr/local/bin/perl

print STDOUT "Please type your name: ";
$n = <STDIN>;

printf (  STDOUT "Hello %s", $n );