richard noel fell wrote:
> Below is a simple script which I am using as part of my attempt to learn
> how to program a gui with perl and Tk. I have copied the program from a
> book, "Cross Platform Perl" (not very good, but some isolated good
> parts), but get the following error message when I try to compile the
> program. Has anyone any idea what is wrong?
> Thanks in advance,
> Dick Fell
>
> [rfell@rosewall webproject]$ tktext.pl
> Unquoted string "end" may clash with future reserved word at ./tktext.pl
> line 57.
> Can't modify negation (-) in scalar assignment at ./tktext.pl line 8,
> near ""File","
> Execution of ./tktext.pl aborted due to compilation errors.
> [rfell@rosewall webproject]$
>
>
>
> #!/usr/local/ActivePerl-5.6/bin/perl5.6.1 -w
>
> use Tk;
> my $main=new MainWindow;
> $menubar= $main->Frame(-relief=>"raised",
> -borderwidth=>2);
>
> $filebutton=$menubar->Menubutton;(-text="File",
> -underline=>0);
You have a semicolon betwen Menubutton and (-text etc.), and the = should be
=>.
Also, you might want to quote your switches like this:
$menubar= $main->Frame('-relief'=>"raised",
'-borderwidth'=>2);
Tagore Smith
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
