tcsh sheLL

FOLLOW YOUR HEART mirror_92 at yahoo.com
Wed Apr 19 22:17:56 EEST 2000


#!/bin/tcsh


### EISAGWGH STOIXEIWN ################
printf "\033[1;33m FIRST NAME: \033[0m"
set fname=$<

printf "\033[1;33m LAST NAME:  \033[0m"
set lname=$<

printf "\033[1;33m PHONE 1:    \033[0m"
set phone1=$<

printf "\033[1;33m PHONE 2:    \033[0m"
set phone2=$<


printf "\033[1;32m Do you want to add this entry, to the address book ?
\
 Answer (y/n) \033[0m"
set tellme=$<




while (1)
switch ("$tellme")

case yes|YES|Yes:   # Simeio (1)
  #mysql test < "/home/natalia/examples/ins.sql"   # Simeio (2)
     if ( $status == 1) then
       echo "den yparxei tetoia eggrafi"
     endif
    clear
    break

case NO|no|No:
       echo "Cancel"
      clear
      break

default:
      printf "\033[1;31m Just Answer Yes OR No: \033[0m;
      tellme=$<
      continue  # Simeio (3)
 endsw
end

#------------------------------------------------------------------------------

# Simeio (1): Pos 8a to kanw na dexete aytes tis 3 times.
#  xwris na xrisimopoiiso case Y* ;

# Simeio (2): To script mou ins.sql einai:
#
#       insert into PINAKAS(fname, lname, phone1, phone2)
#
#       VALUES  ("$fname", "$lname", "$phone1", "$phone2");
#


# Simeio (3): Giati den kanei continue molis dwsw ena la8os epilogi ?
#

#-----------------------------------------------------------------------

# Simeio (4):


printf "\033[1;32m

                 ======================================

|
|
==================       ====================
====================
|                                                      ONE
ENTRY                                |
==================       ====================
====================
                 |                                    |
                 ======================================       \n
\033[0m"


Otan to trexw apo bash shell ola OK, mu to bgazei kanonika.
otan to trexw apo tcsh shell mou leei Unmatched ".
1)ti sto kalo simenei ayto?
2) POS MPORW NA TO TREJW?




--
linux-greek-users mailing list -- http://lists.hellug.gr




More information about the Linux-greek-users mailing list