Name | Modified | Size | Downloads / Week |
---|---|---|---|
Parent folder | |||
Makefile | 2021-11-11 | 2.3 kB | |
README.txt | 2021-11-11 | 770 Bytes | |
telephone.pl | 2021-11-11 | 11.4 kB | |
Telephone.sm | 2021-11-11 | 10.5 kB | |
Totals: 4 Items | 25.0 kB | 0 |
Perl/Tk Example 7 This is a telephone finite state machine. + Building ---------- NOTE: Smc.jar must be built and installed. Unix & Windows: $ make telephone + Executing ----------- (Make sure you have sound turned on before running this application.) Do what you normally do with a telephone: pick up the receiver and start dialing. Try some of these telephone number: + 555-1212 + 555-9263 + 1-212-555-1234 + 879-6877 + 1-802-521-6448 + Dial a "#" or a "*" + 911 When you have completed the telephone call put down the receiver. Note: If you don't put down the receiver after the call has completed, a "receiver left off hook" alarm will sound. Unix & Windows: $ perl telephone.pl