when i "use DB_File" the files produced lack a dot in their title, eg.
dbmopen %email, email.db, 0666;
manipulates a file who's directory entry is actually emaildb
MORE IMPORTANTLY, perl will not access a database outside of the same
directory as the script -- it pulls a blank hash. without
you know gunnar i would swear on my mothers grave that i tried using
both "" and '' in this and it still would not work, otherwise i really
really really would not have cried wolf...but in all honesty it does
work now, so there's egg on my face
however, my connection of "dbmopen" with "DB_F
i am trying to create a perl routine to traverse directories (like a
file browser) that will be incorporated into a more specific framework,
but for some incomprehensible (to me) reason, opendir will not produce
correct information when called in a sub!!! Why (the exact same script
works fi
hey sorry, cancel that
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
http://learn.perl.org/
On 02/09/2008 12:31:33 PM, David Moreno wrote:
-> Heh, why?
shucks i figured it out. y'all are kooks and i'll let you know when i
have a REAL question.
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
http://learn.perl.org/
no matter where i use:
$menu->entryconfigure(#,"disabled);
i get:
Can't locate object method "entryconfigure" via package
"Tk::Menu::Cascade"
unless i use it on a non-existent $menu, in which case i get:
Can't call method "entryconfigure" on an undefined value
Also, if i add a -command i
On 02/12/2008 12:49:30 PM, kens wrote:
-> On Feb 12, 9:48 am, [EMAIL PROTECTED] (Mk) wrote:
-> > sorry, zentara, but with my perl 5.8.8 this script first produces:
-> >
-> > Bareword "Mainloop" not allowed while "strict subs" in use at
-> > ./Tkm
Amazingly, what worked in the end was simply adding
-state=> 'disabled'
into the actual $menu->command, hence avoiding the documented
"entryconfigure" method or cget altogether
but if anyone has any patience left could you explain:
my $state = ($count++ & 1) ? 'normal' : 'disabled';
to me,
with eliminated
instead of "shaded" entries, but as always anyone who can successfully
explain these mysteries better to me is very welcome to try ;)
On 02/12/2008 07:26:03 AM, zentara wrote:
-> On Mon, 11 Feb 2008 15:06:27 -0500, [EMAIL PROTECTED] (MK)
-> wrote:
->
On 02/13/2008 11:34:56 AM, [EMAIL PROTECTED] wrote:
-> I've been going over some listings and I found code
->
-> like the following:
->
->
->
-> "./directory/file.txt" and
->
-> "../directory/file.txt"
this is not really a perl question, but since perl does respect the
reference:
"." and ".."
On 02/14/2008 09:33:51 AM, [EMAIL PROTECTED] wrote:
-> I admit, after making my post and taking a break, I had gotten a
-> little ahead of myself when stating this problem. Basically, I had
-> reached a point where I was able to get to @arr3, and couldn't figure
-> the rest out; the previous stuf
from zentara:
-> Now you may not see the usefulness of the entryconfigure or the cget,
-> but what if you had a more complex menu, and needed to dynamically
-> grey out items?
That is exactly what i did (the cascading menus are a recursive tree,
with several hundred+ total entries dynamically
On 02/17/2008 12:08:40 PM, zentara wrote:
-> Yeah, dynamically generated menus would be the way to go,
-> but I would watch out for memory gains everytime you invoke the menu.
-> Tk isn't very good about object cleanup.
i will remember and look into this.
-> Another problem with dynamic menus,
I have a subroutine that begins with a message ("Processing...") and
then proceeds to perform several gigs worth of file transfer via system
calls. Basically:
sub transfer {
print "Processing...\n";
foreach $e (@array) {
print "file $e\n";
syst
On 02/17/2008 03:48:40 PM, Rob Dixon wrote:
MK wrote:
>
I have a subroutine that begins with a message ("Processing...") and
then
proceeds to perform several gigs worth of file transfer via system
calls.
Basically:
sub transfer {
print "Processing...\n";
okay, this is definitely a Tk or GUI issue, since incorporating a for
real "print" (ie. to STDOUT) statement does come out in proper sequence.
Does anyone know if there is a filehandle other than STDOUT for tk
requests?
The simplest version of the problem:
use IO::Handle;
sub tmptest {
PROBLEM SOLVED on comp.lang.perl.tk:
$MW->update; # whenever you want the screen updated
On 02/18/2008 09:46:51 AM, MK wrote:
okay, this is definitely a Tk or GUI issue, since incorporating a for
real "print" (ie. to STDOUT) statement does come out in proper
sequ
nt to look at Perl/Gtk2, which has a much better
-> underlying object design, than Tk. It's object cleanup is much
-> better,
-> and the menuing system is alot clearer.
perl/Gtk2 ?!??! egads...eureka...who would have imagined such a thing!
Scorch my sleep depro
peace & love
just to add my two sense worth i reworked my Tk app to eliminate the
memory gains from $widget->destroy (using -- much thanks, i surrender,
zentara -- cget->entryconfigure) and it works beautifully and does
exactly everything i want, certainly i like it more than anything i've
seen attempti
On 02/25/2008 04:32:42 AM, Anirban Adhikary wrote:
-> Dear List
->
-> I need to delete each element after every execution of the foreach
-> loop and
-> I need to update & sorted the @arr1 after every execution of the
-> foreach
-> loop. I have tried a lot but not able to do this Pls
-
On 02/25/2008 09:01:27 AM, Tim Bowden wrote:
-> Making progress. Needed to understand hash references, and how to
-> de-reference them.
delete($HASH{$KEY});
if that's what you mean; good luck with the stupid stick (i hope it
ain't me)
->
-> Tim Bowden
->
-> On Mon, 2008-02-25 at 14:54 +0900
On 02/27/2008 09:04:50 AM, obdulio santana wrote:
-> Hi.
->
-> I want to read from keyboard some keys [pagedown],
-> [Home],[End][PageUp][up][left][down][right].
->
-> how can I do it?
->
-> Thanks in advance.
->
->
Term::Readkey also works but is poorly documented.
Does anyone know how to use t
Okay i have the exact answer for you now. The following script will
give you decimal and hexidecimal values for each keypress. The hex
value can be used in normal regex and print statements using \x; the
example in the script quits using capital Q and (from my keyboard) PgUp
(this probabl
On 02/27/2008 02:59:30 AM, vijay krishna wrote:
-> Hi All,
-> I want to check if a sub routine that I am calling
-> returns a value or not.
-> This is how my code is
-> $str = function(parameter)
->
-> sub function
-> {
->
-> ..
->
-> }
->
-> the sub routine func
On 02/29/2008 11:21:52 AM, Tom Phoenix wrote:
-> On Thu, Feb 28, 2008 at 4:28 PM, MK <[EMAIL PROTECTED]>
-> wrote:
->
-> > # do not "use strict"
because i don't. that's all. but wait a minute...
-> > The purpose of
-> > return is t
has
a integer value like an exit code.
Your diligence is sincerely appreciated.
MK @ perl.beginners
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
http://learn.perl.org/
ps. Tom do you know why are you one of those people who's messages
always appear twice in my mailing list?
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
http://learn.perl.org/
On 03/01/2008 07:53:53 AM, Jeff Pang wrote:
-> On Sat, Mar 1, 2008 at 8:39 PM, MK <[EMAIL PROTECTED]>
-> wrote:
-> > ps. Tom do you know why are you one of those people who's messages
-> > always appear twice in my mailing list?
-> >
->
-> Because Tom re
On 03/01/2008 10:42:44 AM, Tom Phoenix wrote:
-> Here's another pair for you. Your mail client is probably only
-> showing
-> the basic email header lines, which would include the "to:" header
-> indicating that you're the primary recipient. Get your program to
-> show
Tom i actually cat & grepp
On 03/04/2008 03:41:44 PM, yitzle wrote:
-> I'd use a RegEx and test to see if the string is made up entirely of
-> integers.
-> print "The variable containing $p is an interger\n" if ($p =~
-> /^[0-9]+$/);
yitzle would seem to have the most foolproof solution. The only
problem would be if
30 matches
Mail list logo