Help for this page
# Handle Ctrl-C $SIG{INT} = \&ctrlc; ... print "You used Ctrl-C!"; exit 1; }
(C)reate,(L)ist,(N)ew,(M)odify,(R)emove,(Q)uit? Use of uninitialized v +alue $choice in chomp at J:\ps \monks.pl line 13. Use of uninitialized value $choice in lc at J:\ps\monks.pl line 14. You used Ctrl-C!