open (FILE, "<<", $input;)
        while( <FILE>)
        {
          if (/"running"/s)
          {print "found";}
        }