Beefy Boxes and Bandwidth Generously Provided by pair Networks
Think about Loose Coupling

Label Widget

by Lhamo_rin (Friar)
on Jun 17, 2003 at 19:17 UTC ( #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();

    "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?

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

How do I use this? | Other CB clients
Other Users?
Others imbibing at the Monastery: (5)
As of 2021-02-26 21:44 GMT
Find Nodes?
    Voting Booth?

    No recent polls found