Help for this page

Select Code to Download


  1. or download this
    my $file = 'c:\temp\running.tmp';
    open(RUNNING, ">$file");
    close(RUNNING);
    ##Do your stuff
    unlink($file);
    
  2. or download this
    my $file = 'c:\temp\running.tmp';'
    if(-e $file){
    ...
    }else{
      print "Not Running\n";
    }