I have a perl script running on a solaris 9 box that if a mail queue hits 5000 a alarm goes off and send out a e-mail and text page.

What i want to do is when this number is detected I want it to run a command then sleep for 5 minutes
however I haven't been able to get the commands and sleep to work, i'm sure it's not that hard to do
but not working for me.

Her is the bottom part of the script, commented out is the last 3 lines that I need to get to work.


Thanks,



if($queue_number >= 5000){
  `mailx -s "EEU MTA, pmx is $queue_number, should stop dispatcher." user1\@my.domain.com < /usr/local/scripts/mydotfi
le.txt`;
  `mailx -s "EEU MTA, pmx is $queue_number, should stop dispatcher." user2\@my.domain.com < /usr/local/scripts/mydo
tfile.txt`;
  `mailx -s "EEU MTA, pmx is $queue_number, should stop dispatcher." user3\@my.domain.com < /usr/local/scripts/mydotfile
.txt`;
  `mailx -s "EEU MTA, pmx is $queue_number, should stop dispatcher." 7725484747\@text.com < /usr/local/scripts/mydotfile.txt`;
  `mailx -s "EEU MTA, pmx is $queue_number, should stop dispatcher." 7725484748\@text.com < /usr/local/scripts/mydotfile.txt`;
  `mailx -s "EEU MTA, pmx is $queue_number, should stop dispatcher." 7725484749\@text.com < /usr/local/scripts/mydotfile.txt`;
#  sleep 60;
#  system `/opt/iplanet/ms5/mail/imsimta stop dispatcher`;
#  sleep 300:
#  system `/opt/iplanet/ms5/mail/imsimta stop dispatcher`;

}