#!/bin/sh echo "Content-type: text/html" echo "" PATH=`echo $PATH":."` base="../ep/notep" WWW_bila=$WWW_pal if [ "$WWW_tipo" = "" ] then WWW_bila=$WWW_pal else WWW_bila="$WWW_tipo\| $WWW_pal" fi if [ "$WWW_nl" = "" ] then WWW_pl=0 else WWW_pl=$WWW_nl fi ./fprincipiohb "16" "Noticias Kaixo! Berriak" echo "
" cont=0 buscar="egrep -i 14-M noticias.dat" if [ "$WWW_nl" = "" ] then WWW_pl=0 else WWW_pl=$WWW_nl fi eval "$buscar" > kk4$$ cd /usr/home/kaixo/usr/local/etc/httpd/htdocs/cgi-local numdir=`wc -l ./kk4$$ | cut -d"." -f1` if [ "$numdir" -eq 0 ] then WWW_bila2=`echo "$WWW_bila" | sed -e 's/ /+/g' ` echo "

Ez da ezer aurkitu "$WWW_bila" hitzarekin. Beste hitz batekin sailatu zaitez.
" echo "No se ha encontrado nada con "$WWW_bila". Intenta buscar otra cosa.
" cat << EOF
EOF else WWW_proxl=`expr $numdir - $WWW_ul2` WWW_pp=`expr $WWW_pl + 9` if [ $WWW_pp -lt $numdir ] then WWW_ul=$WWW_pp else WWW_ul=`expr $numdir - 1` fi WWW_pl2=`expr $WWW_pl + 1` WWW_ul2=`expr $WWW_ul + 1` echo "
Se han encontrado "$numdir"noticias ( Mostrando de la "$WWW_pl2" a la "$WWW_ul2") "$WWW_bila"" echo "
"$numdir"berri aurkitu dira ( "$WWW_pl2"tik- "$WWW_ul2"ra erakusten) "$WWW_bila"
" for noticia in `awk -F"|" '{print $1}' kk4$$ | sort -nr | awk ' NR >= '$WWW_pl2' && NR <= '$WWW_ul2' {print $0}' ` do grep -i $noticia noticias.dat | awk -F"|" ' NR <= 30 { print "
"; $7= substr($1,9,2) ":" substr($1,11,2) ":" substr($1,13,2) " " substr($1,7,2) "-" substr($1,5,2) "-" substr($1,1,4) ; print ""$7": "$5"
" }' done echo "" fi WWW_proxl=`expr $numdir - $WWW_ul2` if [ $WWW_proxl -gt 10 ] then WWW_proxl=10 fi if [ $WWW_proxl -ne 0 ] then WWW_bila2=`echo "$WWW_bila" | sed -e 's/ /+/g' ` echo "
Próximas "$WWW_proxl" hurrengoak
" fi rm kk4$$ echo "
" ./ffinalhb