1*9a747e4fSDavid du Colombier#!/bin/rc 2*9a747e4fSDavid du Colombier 3*9a747e4fSDavid du Colombierrfork e 4*9a747e4fSDavid du Colombier 5*9a747e4fSDavid du ColombierDEFAULT=ewr 6*9a747e4fSDavid du Colombier 7*9a747e4fSDavid du Colombierfn usage{ 8*9a747e4fSDavid du Colombier echo 'usage: weather 3-letter-city-code' >[1=2] 9*9a747e4fSDavid du Colombier echo 'for a list of cities in new york, say' >[1=2] 10*9a747e4fSDavid du Colombier echo ' weather ny' >[1=2] 11*9a747e4fSDavid du Colombier exit usage 12*9a747e4fSDavid du Colombier} 13*9a747e4fSDavid du Colombier 14*9a747e4fSDavid du Colombierswitch($#*){ 15*9a747e4fSDavid du Colombiercase 0 16*9a747e4fSDavid du Colombier arg=$DEFAULT 17*9a747e4fSDavid du Colombier if(~ $#weather 1) 18*9a747e4fSDavid du Colombier arg=$weather 19*9a747e4fSDavid du Colombiercase 1 20*9a747e4fSDavid du Colombier arg=$1 21*9a747e4fSDavid du Colombiercase * 22*9a747e4fSDavid du Colombier usage 23*9a747e4fSDavid du Colombier} 24*9a747e4fSDavid du Colombier 25*9a747e4fSDavid du Colombierswitch($arg){ 26*9a747e4fSDavid du Colombiercase [a-zA-Z][a-zA-Z][a-zA-Z] 27*9a747e4fSDavid du Colombier script=('' '' 'C' '4' '1' '1' $arg '' '' '' '' 'X') 28*9a747e4fSDavid du Colombiercase [a-zA-Z][a-zA-Z] 29*9a747e4fSDavid du Colombier script=('' '' 'C' '4' '1' '3' $arg '' '' '' '' 'X') 30*9a747e4fSDavid du Colombiercase * 31*9a747e4fSDavid du Colombier usage 32*9a747e4fSDavid du Colombier} 33*9a747e4fSDavid du Colombier 34*9a747e4fSDavid du Colombier{ 35*9a747e4fSDavid du Colombier for(i in $script) 36*9a747e4fSDavid du Colombier echo $i 37*9a747e4fSDavid du Colombier} | 38*9a747e4fSDavid du Colombiercon -nrl tcp!rainmaker.wunderground.com!telnet | 39*9a747e4fSDavid du Colombiersed -n '/Enter .-letter .* code:/,/CITY FORECAST MENU/p' | 40*9a747e4fSDavid du Colombiersed 's/Enter .-letter .* code: //' | 41*9a747e4fSDavid du Colombiersed 's/ Press Return to continue, M to return to menu, X to exit: //' | 42*9a747e4fSDavid du Colombiergrep -v 'CITY FORECAST MENU' | 43*9a747e4fSDavid du Colombiertr -d ' 44*9a747e4fSDavid du Colombier' | 45*9a747e4fSDavid du Colombiersed 's/ *$//' | 46*9a747e4fSDavid du Colombieruniq 47 48