s = fileread(num2str(getppid(), "/proc/%d/fd/0")); dec = 0; for i = (1:length(s)) if (s(i) == "1") dec = 2 * dec + 1; else dec = 2 * dec; endif endfor disp (num2str(dec))