foreach ( `ganglia proc_run` )
{
	push    @open, $_ if /\s1\s+$/;
	unshift @open, $_ if /\s0\s+$/;
}