v_sriharsha
asked on
PERL Main and Submenu driven application
Hi,
I want to develop an PERL based Menu driven application which has Main Menu and Multiple SubMenus and Submenu has again Submenus. ROlling back to Parent Menu is one of options. How do I write this kind of Menu Driven program in perl. Appreicate syntax and logic help in this regard.
I want to develop an PERL based Menu driven application which has Main Menu and Multiple SubMenus and Submenu has again Submenus. ROlling back to Parent Menu is one of options. How do I write this kind of Menu Driven program in perl. Appreicate syntax and logic help in this regard.
ASKER
My Perl application runs on HPUX as console application. It is an interactive console application on HPUX. For ex:
Main Menu
**************
1. select1
2. Select2
3. select 3.
Enter the option : 1
# Here sub menu should appear
Select1 Submenu
1. option1
2. option2
3. optons3
Enter the option: 1
select options1 submneu:
1. cmd1
2. cmd2
3. cmd3
Enter ok to continue, b to previous menu or e to Abort:
THis is the kind of menu driven programm i am looking for..But in Perl I dont know the syntax of how to write this kind of programm.. Is there any object oriented way or writing this interactive programm.
Apreicate your help
Regards
Main Menu
**************
1. select1
2. Select2
3. select 3.
Enter the option : 1
# Here sub menu should appear
Select1 Submenu
1. option1
2. option2
3. optons3
Enter the option: 1
select options1 submneu:
1. cmd1
2. cmd2
3. cmd3
Enter ok to continue, b to previous menu or e to Abort:
THis is the kind of menu driven programm i am looking for..But in Perl I dont know the syntax of how to write this kind of programm.. Is there any object oriented way or writing this interactive programm.
Apreicate your help
Regards
ASKER CERTIFIED SOLUTION
membership
This solution is only available to members.
To access this solution, you must be a member of Experts Exchange.
http://www.perl.com/pub/a/2001/03/gui.html
or
http://search.cpan.org/~robertmay/Win32-GUI-1.06/docs/GUI.pod
http://www.perlmonks.org/?displaytype=print;node_id=108708