File: X11_used_namespace_sockets

package info (click to toggle)
libx11-keyboard-perl 1.4-4
  • links: PTS, VCS
  • area: main
  • in suites: jessie, jessie-kfreebsd
  • size: 80 kB
  • ctags: 9
  • sloc: perl: 68; sh: 16; makefile: 11
file content (13 lines) | stat: -rwxr-xr-x 227 bytes parent folder | download 
1
2
3
4
5
6
7
8
9
10
11
12
13
 
#!/bin/sh

ss -xl | grep @/tmp/.X11-unix | \
awk '
{
	n=split($0,lines,"\n");
	for(i=1;i<=n;i++){
		line_delim=split(lines[i],cols," ");
		col_delim=split(cols[5],sockets,"/X");
		printf ("|%s|\n",sockets[col_delim]);
	};
};
'