Using Test::More, how can I intersperse stuff for user interaction? For instance:
print "Please enter the hostname/ip for the server [localhost]: "; my $host = <STDIN>; print "Please enter the admin password [default]: "; my $password = <STDIN>; $agent = esmith::FormMagick::Tester->new(host => $host, password => $password); isa_ok($agent, 'esmith::FormMagick::Tester'); is($agent->{password}, $password || 'default', "Set password correctly"); Test::More takes control of so much stuff that my user prompts are never printed. K.