Simple Q: Make it prompt for a variable

Anonymous Monk has asked for the wisdom of the Perl Monks concerning the following question:

Replies are listed 'Best First'.
Re: Simple Q: Make it prompt for a variable by Nkuvu (Priest) on Jul 11, 2004 at 19:21 UTC
`#!/usr/bin/perl use strict; print "Enter your name: "; my $name = <STDIN>; chomp $name; print "Hello, $name\n";` [download]	[reply] [d/l]
Re: Simple Q: Make it prompt for a variable by Zaxo (Archbishop) on Jul 11, 2004 at 19:29 UTC
If you have file names in the command line, `<>` will not do: `my $prompt = 'Prompt: '; print $prompt; chomp( my $var = <STDIN> );` [download] After Compline, Zaxo	[reply] [d/l]
Re: Simple Q: Make it prompt for a variable by pbeckingham (Parson) on Jul 11, 2004 at 19:19 UTC
Try: `print "Enter something: "; my $something = <>;` [download]	[reply] [d/l]
Re: Simple Q: Make it prompt for a variable by BUU (Prior) on Jul 11, 2004 at 19:22 UTC
Unless I'm missunderstanding you, you want to read from stdin. Do so with the standard readline function or operator: `<>`, like `$\|=1; #majick print "Please enter data:\n"; my $data = <STDIN>;` [download]	[reply] [d/l] [select]
Re^2: Simple Q: Make it prompt for a variable by chromatic (Archbishop) on Jul 11, 2004 at 23:34 UTC
What is the purpose of the unbuffering there?	[reply]
Re^3: Simple Q: Make it prompt for a variable by BUU (Prior) on Jul 12, 2004 at 00:11 UTC
Actually ya know what, I'm not sure it has a point. I was just thinking about cases dealing with trying to read and print to stdout/in and some times having problems with the "prompt" not being printed until you read from stdin.	[reply]
Re^4: Simple Q: Make it prompt for a variable by chromatic (Archbishop) on Jul 12, 2004 at 05:29 UTC
Re: Simple Q: Make it prompt for a variable by roju (Friar) on Jul 12, 2004 at 15:33 UTC
Look at Term::Readline. Automatically adds history, editing, etc. Makes programs that present a shell much nicer to deal with, IMHO. Also almost trivial to add support for.	[reply]