From f39fc4dc243394f353862f075da19ee376e8d907 Mon Sep 17 00:00:00 2001 From: Dan Buch Date: Wed, 5 Jan 2011 21:25:01 -0500 Subject: [PATCH] fun with user input --- cli/stdio.pl | 15 +++++++++++++++ 1 file changed, 15 insertions(+) create mode 100644 cli/stdio.pl diff --git a/cli/stdio.pl b/cli/stdio.pl new file mode 100644 index 0000000..96c15e0 --- /dev/null +++ b/cli/stdio.pl @@ -0,0 +1,15 @@ +#!/usr/bin/env perl +use strict; +use warnings; + + +print "What is your name?: "; + +my $name = ; +$name =~ s/\n//; + +print "Your name is $name\n"; + + +1; +__END__