comment on

Guys. i need further help. As a action i need to run a command. so what i did is added below in the BOLD.

#use 5.010;
use strict;

my $modified_within  = 60 * 2;           # 2 minutes
my $size_limit       = 1024 * 1024 * 2;  # 2 MB
my $OPCMSG    = "C:\Program Files\HP\HP BTO Software\bin\win64\OpC\opc
+msg.exe";

my $file = "H:\\Program Data\\HP\\HP BTO Software\\shared\\tmp\\queues
+\\MsgQueue";

if ([stat $file]->[9] > time - $modified_within)
{
    if (-s $file > $size_limit) {
#        print "File is recent, and over size limit";
    }
    else {
        print "File is recent, but not over size limit";
$OPCMSG a=OM9 o=failover s=normal mag_t="Hello!! I am fine, hope you a
+re doing well";
    }
}
else
{
    print "File is not recent";
}
[download]

But it return me error saying <c> Bareword found where operator expected at C:\Migration\failover.pl line 17, near "$OPCMSG a" (Missing operator before a?) syntax error at C:\Migration\failover.pl line 17, near "$OPCMSG a" Substitution replacement not terminated at C:\Migration\failover.pl line 17. How can i run this command through script?

In reply to Re^4: Perl script on windows node by kaka_2
in thread Perl script on windows node by kaka_2

Are you posting in the right place? Check out Where do I post X? to know for sure.
Posts may use any of the Perl Monks Approved HTML tags. Currently these include the following:
<code> <a> <b> <big> <blockquote> <br /> <dd> <dl> <dt> <em> <font> <h1> <h2> <h3> <h4> <h5> <h6> <hr /> <i> <li> <nbsp> <ol> <p> <small> <strike> <strong> <sub> <sup> <table> <td> <th> <tr> <tt> <u> <ul>
Snippets of code should be wrapped in <code> tags not <pre> tags. In fact, <pre> tags should generally be avoided. If they must be used, extreme care should be taken to ensure that their contents do not have long lines (<70 chars), in order to prevent horizontal scrolling (and possible janitor intervention).
Want more info? How to link or How to display code and escape characters are good places to start.


Perl: the Markov chain saw
	PerlMonks