11 lines
235 B
Text
11 lines
235 B
Text
|
$ "Please enter a string: " input
|
||
|
|
say 'You entered: "' echo$ say '"' cr cr
|
||
|
|
|
||
|
|
$ "Please enter an integer: " input
|
||
|
|
trim reverse trim reverse
|
||
|
|
$->n iff
|
||
|
|
[ say "You entered: " echo cr ]
|
||
|
|
else
|
||
|
|
[ say "That was not an integer." cr
|
||
|
|
drop ]
|