For simple prepackaged prompting, I'm rather fond of IO::Prompt. As far as "anticipating" input, I don't fully understand what you mean by that. If you just want to present a default option, that's fairly trivial with the module mentioned above:

#!perl

use strict;
use warnings;
use IO::Prompt;

my $dir = prompt("Pick a directory", -default => "C:/Temp");
print "\n\nPicked: $dir\n";
[download]

If you want anything more complex, then zentara's suggestion would be more apt.