> But, the script below does not work. I get an error message : > Not an ARRAY reference at > /usr/local/ActivePerl-5.6/lib/site_perl/5.6.1/i686-linux-threa > d-multi/Tk/Menu.pm > line 69. The cause of this is the subroutine sub_menu. As I > understand things, the argument to -menuitems must be a > reference to an anonymous array. Am I correct? Is there a way > of getting sub_menu to return such a value or is there > another way to do this?
To return a reference to an array, use: return \@array; HTH, -dave -- To unsubscribe, e-mail: [EMAIL PROTECTED] For additional commands, e-mail: [EMAIL PROTECTED]
