home *** CD-ROM | disk | FTP | other *** search
/ Chip 2003 August / Chip_2003-08_cd1.bin / zkuste / macos / Files / iSyncPal.dmg / iSync_Palm.pkg / Contents / Resources / preflight < prev    next >
Text File  |  2002-11-12  |  333b  |  20 lines
  1. #!/usr/bin/perl
  2.  
  3. #2002.11.11.1.bc
  4.  
  5. my $IS_RUNNING = 0;
  6.  
  7. open(PSOUT, "/bin/ps -awwx |");
  8. while( <PSOUT> ) {
  9.         if( /iSync\.app/ ) {
  10.                 $IS_RUNNING = 1;
  11.         }
  12. }
  13. close(PSOUT);
  14.  
  15. if(1 eq $IS_RUNNING) {
  16.         system("/usr/bin/osascript -e \'tell application \"iSync\"\' -e \'quit\' -e \'end tell\' &");
  17. }
  18.  
  19. exit(0);
  20.