execute a vbscript from a perl script.

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

Hello Experts,

I have a simple perl script to check the last modified time of a file and if files's time was not modifed in last 5 minute as a next course of action i wan to execute a vb script.

i tried

my $cmd = "cscript C:\\ProgramData\\HP\\HP BTO Software\\bin\\instrumentation\\Failover.vbs";

and then used qx($cmd);

but this script will not be executed.

Could you help me with this?

-KAKA-

Comment on execute a vbscript from a perl script.

Replies are listed 'Best First'.
Re: execute a vbscript from a perl script. by Abe (Acolyte) on Sep 06, 2012 at 14:50 UTC
Shouldn't there be escaped quotes round the path to the vbs? cscript will think it's getting 3 parameters as things stand	[reply]
Re^2: execute a vbscript from a perl script. by hpomw (Initiate) on Sep 06, 2012 at 15:04 UTC
Hi Abe, Could you reply with how should it look like as per you? -KAKA-	[reply]
Re^3: execute a vbscript from a perl script. by Corion (Patriarch) on Sep 06, 2012 at 15:11 UTC
Maybe you could try to add quotes yourself instead of making others do your work for you?	[reply]
Re^4: execute a vbscript from a perl script. by hpomw (Initiate) on Sep 06, 2012 at 15:18 UTC
Re^5: execute a vbscript from a perl script. by Corion (Patriarch) on Sep 06, 2012 at 18:54 UTC
Re^4: execute a vbscript from a perl script. by Abe (Acolyte) on Sep 06, 2012 at 15:35 UTC
Re^5: execute a vbscript from a perl script. by runrig (Abbot) on Sep 06, 2012 at 15:56 UTC
Re^5: execute a vbscript from a perl script. by fisher (Priest) on Sep 07, 2012 at 08:21 UTC
Re: execute a vbscript from a perl script. by aitap (Curate) on Sep 06, 2012 at 18:10 UTC
but this script will not be executed. Does it print anything? Did you check $? or $! for error codes or explanations? `$ perl -E'qx(thereisnosuchcommand); say "$? $!"' -1 No such file or directory` [download] Sorry if my advice was wrong.	[reply] [d/l]


good chemistry is complicated, and a little bit messy -LW
	PerlMonks