Beefy Boxes and Bandwidth Generously Provided by pair Networks
Come for the quick hacks, stay for the epiphanies.
 
PerlMonks  

Label Widget

by Lhamo_rin (Friar)
on Jun 17, 2003 at 19:17 UTC ( [id://266604]=perlquestion: print w/replies, xml ) Need Help??

Lhamo_rin has asked for the wisdom of the Perl Monks concerning the following question:

Is it possible to display a Hash as the text for a label widget?

Replies are listed 'Best First'.
Re: Label Widget
by crouchingpenguin (Priest) on Jun 17, 2003 at 19:39 UTC

    Depends on if you mean the text of a hash key or not. You could maybe want to Dump the hash with Data::Dumper. The following shows both:

    #!/usr/bin/perl use strict; use warnings; use Data::Dumper; use Tk 800; + my %hash = ( key1 => 'value1', key2 => 'value2', ); + my $mw = Tk::MainWindow->new(); my $label_with_hash_key = $mw->Label( -text => $hash{key1}, )->pack(); my $label_with_hash_dump = $mw->Label( -text => Dumper(\%hash), )->pack(); my $button = $mw->Button( -text => 'Quit', -command => sub { exit; }, )->pack(); $mw->geometry('=320x240+120+1'); $mw->MainLoop();

    cp
    ----
    "Never be afraid to try something new. Remember, amateurs built the ark. Professionals built the Titanic."
Re: Label Widget
by hawtin (Prior) on Jun 17, 2003 at 20:03 UTC

    Do you mean a hash character (#) or a %hash One is easy

    $widget = $t_frame->Label( -text => "# Text with a hash" );

    The other just begs the question of what display a Hash means

Log In?
Username:
Password:

What's my password?
Create A New User
Domain Nodelet?
Node Status?
node history
Node Type: perlquestion [id://266604]
Approved by zakb
help
Chatterbox?
and the web crawler heard nothing...

How do I use this?Last hourOther CB clients
Other Users?
Others having an uproarious good time at the Monastery: (4)
As of 2024-04-25 07:06 GMT
Sections?
Information?
Find Nodes?
Leftovers?
    Voting Booth?

    No recent polls found