Inserting Image in a button

Lets say, i have an image at E:/icons/ttt so, how do i show it on a button created using Tk. I tried to learn from the widget application, but they have some specific folder, INC or something.. -- To unsubscribe, e-mail: [EMAIL PROTECTED] For additional commands, e-mail: [EMAIL PROTECTED] http://

Re: Regexp problem

Glad you got the answer. Next time, please work harder on explaining your problem so the community can understand what you want and benefit from the solution. Somu <[EMAIL PROTECTED]> wrote: I got the answer and its working fine.. Actually i made a TicTacToe game using Tk. The buttons have are

Re: New to OO Perl

You may want to seperate your initialization from instantiation. sub new { my ( $class, $data ) = @_; my $self = bless {}, $class; $self->init(); return $self; } sub init { my ($self) = @_; $self->{image_magick_object} = Image::M

Re: Checking if files are older than 20 mins in a particular directory

2007/5/3, Jay Savage <[EMAIL PROTECTED]>: Not quite. -M reports "Script start time minus file modification time, in days." To put it another way, -M reports how old the file was when the script started running. Or more appropriately, how old the file would have been when the script started runn

Re: Regexp problem

I got the answer and its working fine.. Actually i made a TicTacToe game using Tk. The buttons have are like as below: l o r m p s n q t and i keep adding the character alternatingly to 2 strings.. When any of the strings reaches length >= 3 then i start checking for any pattern out of the eight..

New to OO Perl

Hi all, I'm new to writing Object Oriented Perl and am hoping for some advice? I found the need to use Image::Magick tonight and in order to reuse the code in future I put it in a package of subs. I then thought it seemed like a good opportunity to try writing an OO module so I did. Howev

Re: Checking if a file in a directory is older than 20 mins.

Chas Owens wrote:> #!/usr/bin/perl for my $file (<.* *>) { print "$file is ", int(24*60 * -M $file), " minutes old\n"; } Thanks Chas! Exactly what I was looking for =). Cheers -Chris -- To unsubscribe, e-mail: [EMAIL PROTECTED] For additional commands, e-mail: [EMAIL PROTECTED] http:

imlib2: draw special-chars

Hi Users... I want to write a text into a picture with Image::Imlib2 with this line: $image->draw_text($x, $y, "$text"); before this I define also the font-path, the font-color and load after the font... If the text is this: 10/17 all went fine and the text is on the picture... but if the te

Re: Checking if files are older than 20 mins in a particular directory

Jay Savage wrote: > On 5/2/07, Rob Dixon <[EMAIL PROTECTED]> wrote: >> Chris E. Rempola wrote: >> > >> > Could someone point me in the right direction to write out a simple >> Perl >> > script to check for old files in a particular directory that are older >> > than 20 mins. Is there a module to g

Re: Checking if a file in a directory is older than 20 mins.

On 5/2/07, Chris E. Rempola <[EMAIL PROTECTED]> wrote: Hi All: Can anyone give me some direction in writing a simple Perl script for checking files in a particular directory thats older than 20 mins. Is there a module I can use to grab the current time-stamp of a file? Thanks in advance -C

Re: Win32 script cannot read command line argument.

Hi David, Thanks a lot! It works -) My association was "C:\Perl\bin\perl.exe" "%1" Vladimir - Original Message - From: "Wagner, David --- Senior Programmer Analyst --- WGO" <[EMAIL PROTECTED]> To: "Vladimir Lemberg" <[EMAIL PROTECTED]>; Sent: Wednesday, May 02, 2007 2:11 PM Subject:

RE: Win32 script cannot read command line argument.

> -Original Message- > From: Vladimir Lemberg [mailto:[EMAIL PROTECTED] > Sent: Wednesday, May 02, 2007 14:01 > To: beginners@perl.org > Subject: Win32 script cannot read command line argument. > > Hi All, > > My script is unable to read argument when I'm executing it > as: script.pl .

Re: Checking if files are older than 20 mins in a particular directory

On 5/2/07, Rob Dixon <[EMAIL PROTECTED]> wrote: Chris E. Rempola wrote: > Hi All: > > Could someone point me in the right direction to write out a simple Perl > script to check for old files in a particular directory that are older > than 20 mins. Is there a module to grab current timestamp? Th

Win32 script cannot read command line argument.

Hi All, My script is unable to read argument when I'm executing it as: script.pl . However, when I'm running it as: perl script.pl - it works fine. I did associate perl scripts with Perl as explained in ActivePerl-Winfaq4.htm All my scripts, which doesnt require any arguments works file. I

Re: crypt() and /etc/shadow entries do not match?

Thanks John and Chas! > [EMAIL PROTECTED] wrote: >> Hey folks, > > Hello, > >> I have been using crypt for a while. No problems until recently. >> >> Problem crypt does not return a hash that matches getpwnam(). I have >> been >> using crypt for a long time without any problems. >> >> Bellow is t

Re: Checking if files are older than 20 mins in a particular directory

Chris E. Rempola wrote: > Hi All: Hello, > Could someone point me in the right direction to write out a simple Perl > script to check for old files in a particular directory that are older > than 20 mins. Is there a module to grab current timestamp? Thanks. You could probably use the -M file t

Re: Checking if files are older than 20 mins in a particular directory

Chris E. Rempola wrote: Hi All: Could someone point me in the right direction to write out a simple Perl script to check for old files in a particular directory that are older than 20 mins. Is there a module to grab current timestamp? Thanks. Check out perldoc -f -x and look at the -M o

Checking if a file in a directory is older than 20 mins.

Hi All: Can anyone give me some direction in writing a simple Perl script for checking files in a particular directory thats older than 20 mins. Is there a module I can use to grab the current time-stamp of a file? Thanks in advance -Chris -- To unsubscribe, e-mail: [EMAIL PROTECTED] F

Checking if files are older than 20 mins in a particular directory

Hi All: Could someone point me in the right direction to write out a simple Perl script to check for old files in a particular directory that are older than 20 mins. Is there a module to grab current timestamp? Thanks. -- To unsubscribe, e-mail: [EMAIL PROTECTED] For additional commands

Re: crypt() and /etc/shadow entries do not match?

On 5/2/07, Chas Owens <[EMAIL PROTECTED]> wrote: On 5/2/07, Chas Owens <[EMAIL PROTECTED]> wrote: > On 5/2/07, [EMAIL PROTECTED] <[EMAIL PROTECTED]> wrote: > snip > > I have tested crypt() on debian, and redhat. Same problems. The has values > > do not match each other. > snip > > It looks like y

Re: crypt() and /etc/shadow entries do not match?

On 5/2/07, Chas Owens <[EMAIL PROTECTED]> wrote: On 5/2/07, [EMAIL PROTECTED] <[EMAIL PROTECTED]> wrote: snip > I have tested crypt() on debian, and redhat. Same problems. The has values > do not match each other. snip It looks like your /etc/shadow file is not using crypt to store the passwords

Re: crypt() and /etc/shadow entries do not match?

On 5/2/07, [EMAIL PROTECTED] <[EMAIL PROTECTED]> wrote: snip I have tested crypt() on debian, and redhat. Same problems. The has values do not match each other. snip It looks like your /etc/shadow file is not using crypt to store the passwords on that system. from man shadow The password

Re: crypt() and /etc/shadow entries do not match?

[EMAIL PROTECTED] wrote: > Hey folks, Hello, > I have been using crypt for a while. No problems until recently. > > Problem crypt does not return a hash that matches getpwnam(). I have been > using crypt for a long time without any problems. > > Bellow is test script I have using for testing h

Re: Regexp problem

Somu wrote: Actually thats what i was looking for: l.*o.*r So, if the user entered string is to be matched for 'lpt', then i'll use l.*p.*t ? And to match 'npr' i use .*n.*p.*r ? Somu you need to tell us exactly what match you want, otherwise we can't tell you whether something will work or

crypt() and /etc/shadow entries do not match?

Hey folks, I have been using crypt for a while. No problems until recently. Problem crypt does not return a hash that matches getpwnam(). I have been using crypt for a long time without any problems. Bellow is test script I have using for testing hashs. The output of the script bellow is as fol

Re: Open() and glob EXPR

Ok i got that.. I also checked the perldoc -f q -- To unsubscribe, e-mail: [EMAIL PROTECTED] For additional commands, e-mail: [EMAIL PROTECTED] http://learn.perl.org/

Re: Regexp problem

Actually thats what i was looking for: l.*o.*r So, if the user entered string is to be matched for 'lpt', then i'll use l.*p.*t ? And to match 'npr' i use .*n.*p.*r ? -- To unsubscribe, e-mail: [EMAIL PROTECTED] For additional commands, e-mail: [EMAIL PROTECTED] http://learn.perl.org/

Re: Perl plugin for eclipse

Nath, Alok (STSD) 写道: Hi, Has anybody used any perl plugin for Eclipse ? Please share your thoughts. I am looking for one. Thanks Alok. Komodo is recommended -- To unsubscribe, e-mail: [EMAIL PROTECTED] For additional commands, e-mail: [EMAIL PROTECTED] http://learn.perl.org/

Re: Perl plug-in for eclipse

Yes, it works great. But for some programs, it's still better to run from command line, cause I've seen some that won't run in it for some reason. Well, especially ones looking for <>. It'll run via the gui, but you gotta guess what it's asking and type it in. On Wed, May 2, 2007 8:11 am, Nath

RE: Perl plugin for eclipse

http://e-p-i-c.sourceforge.net/ -Original Message- From: Nath, Alok (STSD) [mailto:[EMAIL PROTECTED] Sent: Wednesday, May 02, 2007 5:41 PM To: beginners@perl.org Subject: Perl plugin for eclipse Hi, Has anybody used any perl plugin for Eclipse ? Please share your thoughts. I am lo

Perl plugin for eclipse

Hi, Has anybody used any perl plugin for Eclipse ? Please share your thoughts. I am looking for one. Thanks Alok. -- To unsubscribe, e-mail: [EMAIL PROTECTED] For additional commands, e-mail: [EMAIL PROTECTED] http://learn.perl.org/

Re: Illegal use of undefined subroutine..

> "Somu" == Somu <[EMAIL PROTECTED]> writes: Somu> Actually, that was just an example to explain my problem. I am facing Somu> this problem when i use Tk. Any subroutine associated with the Somu> -command option of a button widget. Somu> use Tk; Somu> my $mw = MainWindow->new; Somu> my $b =