Use a MsgBox to echo a variable while running the Perl Script Remotely?

Question

Is this possible?

Using VB.net I am executing a remote perl script. I want a MsgBox to appear on my screen, similar to VBScript.

I tried just doing Win32::MsgBox("Test") but that didn't work. Is it even possible?

I am executing the script remotely FROM a Windows system to a Unix system.

"that didn't work" is not a diagnostic message produced by Perl or Windows. In what way did it not work? Was there an error message? An exit code? — mob
– mob, Commented Aug 7, 2012 at 16:01
No error message, no exit code. On my windows system, a msgbox didn't open up. I would assume now that I'm looking into it further is because I am executing the perl script on a unix system, it doesn't have access to Win32 functions. I need to find an alternative though. — Envin
– Envin, Commented Aug 7, 2012 at 16:14

mvp · Accepted Answer · 2012-10-25 07:21:34Z

1

You can use text-only replacement like this:

sub AskYesNo {
    my ($question, $default) = @_;
    print $question, $default ? " [Y/n] " : " [y/N] ";
    my $answer = lc(ReadLine 0);
    chomp $answer;
    return 1 if $answer eq "y";
    return 0 if $answer eq "n";
    return $default;
}

It will select default answer "y" or "n" if user presses just Enter. It may be not pretty, but gets job done and works under any Perl.

answered Oct 25, 2012 at 7:21

mvp

118k15 gold badges132 silver badges155 bronze badges

Sign up to request clarification or add additional context in comments.

Collectives™ on Stack Overflow

Use a MsgBox to echo a variable while running the Perl Script Remotely?

1 Answer 1

Comments

Your Answer

Linked

Hot Network Questions

Collectives™ on Stack Overflow

1 Answer 1

Comments

Your Answer

Sign up or log in

Post as a guest

Linked

Related