Help for this page

Select Code to Download


  1. or download this
    use vars qw( %format );
    
    ...
    FMT1
    }    #look ma, three different block closing methods all
         #in a column down the left side, yay!
    
  2. or download this
    eval $format{GRID};
    die "Oops eval wasn't happy with $format{GRID},\n$@" if $@;