Hello All,
Consider the following small program which captures a keypress and
writes it.
--
# This program hangs up for some reason
$\ = "\n" ; # eliminates need for \n at end of print line
use strict ;
use Tk ;
my
How about:
$database_name = "Greg";
$text = "database_name";
$value = "\$" . $text;
eval "print $value" ;
This worked for me
Hugh Loebner
On 7/27/05, Brian Raven <[EMAIL PROTECTED]> wrote:
> From: [EMAIL PROTECTED]
> [mailto:[EMAIL
open ( $fh{$fhkey}, ">$fhkey" ) ;
}
foreach my $fhkey ( keys %fh ){
print { $fh{$fhkey} } "xxx $fhkey xxx \n"
; # note file handle $fh{$fhkey} has to be in a
block
} ;
foreach my $fhkey ( keys %fh ){
My thanks to all for their prompt and very helpful replies.
Hugh LoebnerOn 6/27/05, Hugh Loebner <[EMAIL PROTECTED]> wrote:
Hello all,
How do I get the path name of the current directory?
In other words, how can I find out the name of the folder in which a program is executing?
Thanks,
Hello all,
How do I get the path name of the current directory?
In other words, how can I find out the name of the folder in which a program is executing?
Thanks,
Hugh
___
ActivePerl mailing list
ActivePerl@listserv.ActiveState.com
To unsubscribe: htt
the script - same error.
Is there a simple way to install SSLeay so that I can access https sites?
Thanks in advance
Hugh Loebner
___
ActivePerl mailing list
ActivePerl@listserv.ActiveState.com
To unsubscribe: http://listserv.ActiveState.com/mailman/mysubs
Have you tried tying the listbox to an array and filling the array?
my @lbarray ;
tie @lbarray, "Tk::Listbox", $listbox_widget ;
I use this and it works reasonably well. I use the same listbox to display to
two arrays, say @a and @b by simply setting @lbarray to either as desired.
if($desired
