blob: 819fbd71e38da607c19b62cba6ed96ea36f91223 (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
|
ans =
1.
-->exec('Example1.sci')
-->clear
-->flag=1
flag =
1.
-->mode(-1)
Current date is 23-Jun-2013
Welcome to the Textbook Companionship Project 2013
+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+
Book Title : UNIX CONCEPTS AND APPLICATIONS
Book Edition : 4
Book Author : Sumitabha Das
+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+
Code Author : Pranav Bhat T
+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+
Chapter Number : 21
Chapter Title : Advanced Shell Programming
+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+-+
Example 1 : Show the method of using arrays in advanced shellscripting
****************************************************************
Answer :
INSTRUCTIONS :
1. Here all instructions are preloaded in the form of a demo
Initially the whole perl script is displaying and then
the result of the same can be seen in the command line interpreter.
2. PLEASE MAKE SURE THAT THE PERLSCRIPT INTERPRETER
EXISTS IN THE SYSTEM
OR THE COMMAND WOULD NOT WORK
3. PRESS ENTER AFTER EACH COMMAND to see its RESULT
5. PRESS ENTER AFTER EACH RESULT TO GO TO THE NEXT COMMAND
.............Press [ENTER] to continue..... UNIX SHELL SIMULATOR(DEMO VERSION WITH PRELOADED COMMANDS)
# Enter the name of the shellscript file whichever you desire
#!/usr/bin/ksh
# Script: dateval.sh - validates a date field using an array
IFS="/"
n="[0-9][0-9]"
set -A month arr 0 31 29 31 30 31 30 31 30 31 30 31
while echo "Enter a date: \c" ; do
read value
case "$value" in
"") echo "No date entered" ; continue ;;
$n/$n/$n) set $value
let rem="$3 % $4"
if [ $2 -gt 12 -o $2 -eq 0 ] ; then
echo "Illegal month" ; continue
else
case "$value" in
29/02/??) [ $rem -gt 0 ] &&
{ echo "20$3 is not a leap year" ; continue ; } ;;
*) [ $1 -gt ${month_arr[$2]} -o $1 -eq 0 ] &&
{ echo "Illegal day" ; continue ; } ;;
esac
fi;;
*) echo "Invalid date" ; continue ;;
esac
echo "$1/$2/$3" is a valid date
done
# type the following command in the command line interpreter as soon as it appears
" h.sh " [COMMANDLINE ARGUMENTS][ENTER]
$ h.sh [COMMANDLINE ARGUMENTS] #to execute the perlscript
---------------->Executing ShellScript in Command Line Prompt<--------------
$ exit #To exit the current simulation terminal and return to Scilab console
........# (hit [ENTER] for result)
BACK TO SCILAB CONSOLE...
Loading initial environment
-->diary(0)
|
