in reply to Re^3: Automatic User input
in thread Automatic User input

here my code using Expect... 
#!/usr/bin/perl
use strict;
use warnings;
use Expect;

my $selection = "option1"
my $openprogram = system("progam.exe");
my $exp = Expect->spawn($openprogram) or die;
$exp-> send ("$selection");


It does not work :( .. I get error
Cannont exec(0):no such file or directory

[download]
Program Died.

Replies are listed 'Best First'.
Re^5: Automatic User input
by hbm (Hermit) on Feb 03, 2011 at 22:28 UTC
    It's been a long time, and I no longer have Expect on hand, but I think you want to change this: 
    my $openprogram = system("progam.exe");

    [download]
    To: 
    my $openprogram = 'progam.exe';  # or '/path/to/program.exe'

    [download]
    Expect->spawn is analogous to system; you don't need both.
[reply]
[d/l]
[select]

In Section Seekers of Perl Wisdom