Hello,
This is the current state of my text-based Perl "menu" script. It pretty
much does everything I want with the exception of colors (two of my highly
influential users want colors). I will therefore appreciate any help or
pointers.
-------------------------------------------------------------------
Program:
(See attached file: fofp_menu_gen.pl)
-------------------------------------------------------------------
Menu file:
(See attached file: projection.menu)
------------------------------------------------------------------
COMMAND:
xterm -cr blue -im +ls -ms blue \
-title "P R O J E C T I O N V 1.0" \
-fn "-schumacher-clean-medium-r-normal-*-*-120-*-75-*-*-*-*" -geometry
"116x72+100+10" \
-bg "#e0ffff" -fg black -e /PROJECTS/MENU/fofp_menu_gen.pl -m 2 \
-t P R O J E C T I O N
' \
/PROJECTS/MENU/projection.menu &
exit
---------------------------------------------------------------
SAMPLE menufile
* DATA PICKUP TOOLS (Projection Coordinator/RA ONLY) *
SCRIPTS_DIR = /fof/proj/PRODUCTION
OTHER SOURCES
HISTORY/ADDYEAR/MANUAL UPDATES
* Pickup DEPOSIT ::
SCRIPTS_DIR->SCRIPTS/foo.sh
* Pickup HISTORY (uses fofnet database) ::
SCRIPTS_DIR->HISTORY_PICKUP/BIN/pickup_fofhistory.sh
* Pickup RUTH ::
SCRIPTS_DIR->SCRIPTS/fofproj_distributor.sh 202
* Add a year of data to a database ::
SCRIPTS_DIR->SCRIPTS/fofproj_distributor.sh 100
* Pickup TFIN ::
SCRIPTS_DIR->SCRIPTS/fofproj_distributor.sh 203
* Update series manually ::
SCRIPTS_DIR->SCRIPTS/fofproj_distributor.sh 206
SMALL Pickups COMPARE
* Pickup CONSUMER CREDIT ::
SCRIPTS_DIR->SCRIPTS/fofproj_small_updates.sh 1
* CURRENT fofp and CURRENT fofproj ::
SCRIPTS_DIR->SCRIPTS/fofproj_compare.sh 1
* Pickup OFHEO INDEX ::
SCRIPTS_DIR->SCRIPTS/fofproj_small_updates.sh 2
? CURRENT fofproj and LAST GREENBOOK fofp ::
SCRIPTS_DIR->SCRIPTS/fofproj_compare.sh _2
* Pickup MUTUAL FUND FORECAST ::
SCRIPTS_DIR->SCRIPTS/fofproj_small_updates.sh 3
* CURRENT fofp and current fofnet ::
SCRIPTS_DIR->SCRIPTS/fofproj_compare.sh 3
* Pickup MORTGAGES ::
SCRIPTS_DIR->SCRIPTS/fofproj_small_updates.sh 4
__________________
William Ampeh
Federal Reserve Board
fofp_menu_gen.pl
Description: Binary data
projection.menu
Description: Binary data
-- To unsubscribe, e-mail: [EMAIL PROTECTED] For additional commands, e-mail: [EMAIL PROTECTED] <http://learn.perl.org/> <http://learn.perl.org/first-response>
