#!/usr/bin/perl use strict; while (1) { my $program = `ps aux | grep PROGRAM`; #some code to determine if the result shows a running program and set $program to 1 if ($prgram) { sleep 60; } else { `PROGRAM`; } }