I used the below perl code to check the change in file size :
1>use Win32::ChangeNotify ;
2>print " \n Enter a file path ";
3>$pt = <STDIN>;
4>chomp $pt;
5>$notify = Win32::ChangeNotify->new($pt, true ,"SIZE");
6>unless ($notify->wait( '1000' ))
7>{
8> print "Nothing Changed";
9>}
10>
11>$notify->reset;
12>print 'Something changed';
after executing the above code (saved in fl1.pl) it asks for the path name (the path where the file is actually getting copied)including the file name .
But after giving the file path (e.g F:\test1\ee.avi )
It throws error in command console "Can't call method "wait" on an undefined value at fl1.pl line 6, <STDIN> line 1."
Could any one please help me how to modify this code.. or whats wrong with this.. so that it can monitor(periodicaly) .. the change in file size which is ( ee.avi sized 1.9 gb )getting downloaded .
Advance thanks for any suggestions on this....
-
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.
|