@sort_savedpids = sort {$a <=> $b} (@savedpids = get_saved_pids());
@sort_livepids = sort {$a <=> $b} (@livepids = get_live_pids());

if (@sort_savepids ne @sort_livepids ) { <DO STUFF> }