[FreeBSD] sed

[Gabor Zahemszky]

Sziasztok!

Tobbektol kaptam visszajelzest, hogy gyulik.  Aki csak miattam toltene,
annak koszonom, tegye felre a drotot.  Ha valaki _nem csak_ miattam nyalja,
az megtenne, hogy maganban ha kesz van kuldene egy levelet, es a vegen
kiosztom, hogy kit nyaggatok a CD-irassal is :-)

Kosz, es bocs az OT-ert.

ZGabor at CoDe dot HU

-- 
#!/bin/ksh
Z='21N16I25C25E30, 40M30E33E25T15U!' ;IFS=' ABCDEFGHIJKLMNOPQRSTUVWXYZ ';set $Z ;for i { [[ $i = ? ]]&&print $i&&break;[[ $i = ??? ]]&&j=$i&&i=${i%?};typeset -i40 i=8#$i;print -n ${i#???};[[ "$j" = ??? ]]&&print -n "${j#??} "&&j=;typeset +i i;};IFS=' 0123456789 ';set $Z;X=;for i { [[ $i = , ]]&&i=2;[[ $i = ?? ]]||typeset -l i;X="$X $i";typeset +l i;};print "$X"