2008-03-27, 17:07
#1
Jag får inte följande program att fungera. Jag vet inte hur jag ska göra så att de olika case fungerar som de ska.
Någon som vet hur jag kan få detta program att fungera som det ska?
case 1 ska leta efter person eller telefonnummer i registret
case 2 ska mata in ett nytt telefonnummer, person i registret
case 3 ska ta bort telefonnummer från registret
case 4 ska skriva ut hela telefonregistret på skärmen
case x ska avsluta programmet (detta fungerar).
jag bifogar min kod så att ni ser hur långt jag har kommit:
Någon som vet hur jag kan få detta program att fungera som det ska?
case 1 ska leta efter person eller telefonnummer i registret
case 2 ska mata in ett nytt telefonnummer, person i registret
case 3 ska ta bort telefonnummer från registret
case 4 ska skriva ut hela telefonregistret på skärmen
case x ska avsluta programmet (detta fungerar).
jag bifogar min kod så att ni ser hur långt jag har kommit:
Kod:
#!/bin/tcsh
#
# A simple script program managing a phone register.
#####################################################
set Data = "tele.data"
if( $#argv ) then
set Data = $1
endif
unset noclobber
touch $Data
while(1)
echo "*** Telefonregister ***"
echo ""
echo " 1/ S”k efter person i registret"
echo " 2/ Mata in nya personuppgifter"
echo " 3/ Radera telefonnummer"
echo " 4/ Visa alla poster i telefonregistret"
echo ""
echo " X/ Avsluta registerprogram"
echo ""
echo -n " Ange ditt val (1,2,3,4,X): "
set Val=($<)
echo ""
switch ($Val)
case '1':
echo "Vilken person vill du söka efter? "
set ord =($<)
$ord
find . -name "*.txt" |xargs egrep "ord"
breaksw
case '2':
echo "Mata in nya personuppgifter: "
set fornamn = ($<)
$fornamn
set efternamn = ($<)
$efternamn
set telefonnummer = ($<)
$telefonnummer
breaksw
case '3':
echo "Vilket telefonnummer ska raderas? "
breaksw
case '4':
echo "Här är alla telefonnummer i registret: "
breaksw
case 'X' :
exit
breaksw
case 'x' :
exit
breaksw
endsw
echo ""
end
