Added whereami reimplementation

4 years ago · c0ff099e94
parent cf2bc799b6
commit c0ff099e94
1 changed files with 6 additions and 0 deletions
--- a/bin/whereami
+++ b/bin/whereami
@ -0,0 +1,6 @@
+#!/usr/bin/env tclsh
+set TTY [exec tty]
+set PWD [exec pwd]
+set HOST [exec hostname]
+set IP [exec sh -c {ip -4 addr | grep -oP '(?<=inet\s)\d+(\.\d+){3}' | sed -n '2p'}] ;# local ipv4 from ethernet or first down list
+puts "$TTY $PWD $HOST $IP"