use strict;
use warnings;

$| = 1;

print "Please enter your name: ";
my $name = <STDIN>;
print STDERR "Your name is $name\n";
print "done\n";