#!/bin/rc

if(! ~ $#* 1) {
	echo usage: pnr 444-6385525 >[1=2]
	exit usage
}

pnr=`{echo $1 | sed 's/-/ /g'}
hget -p 'lccp_pnrno1='^$pnr(1)^'&lccp_pnrno2='^$pnr(2) http://www.indianrail.gov.in/cgi_bin/inet_pnrstat_cgi.cgi >/tmp/pnr.$pid
sam -d /tmp/pnr.$pid >[2]/dev/null<<!
,s/<[^>]*>//g
/Charting Status/ -3 p
+4 p
!
rm /tmp/pnr.$pid