Re: Can't locate object method "gif" via package "GD::Image"

2008-04-02 Thread sivasakthi
> > You don't say what platform or version levels you are using, > but the best bet is to upgrade to the latest gd c library from > boutell.com then install the latest Perl GD module. > http://www.boutell.com/gd/ > > Read the README that comes with the GD module... from the > Frequently Asked

Re: Can't locate object method "gif" via package "GD::Image"

2008-04-02 Thread sivasakthi
> > You don't say what platform or version levels you are using, > but the best bet is to upgrade to the latest gd c library from > boutell.com then install the latest Perl GD module. > http://www.boutell.com/gd/ > > Read the README that comes with the GD module... from the > Frequently Asked Q

Re: delete columns csv file

2008-04-02 Thread John W. Krahn
John W. Krahn wrote: e-letter wrote: Readers, Hello, I have a csv file (greater than 256 columns hence unable to open in spreadsheet) of the following format: column header1, column header2, column header3 1,0.0e0,0.0e0,5e-6 2,0.0e0,0.0e0,6e-7 3,0.0e0,0.0e0,0.0e0 I want to perform: "if col

Re: delete columns csv file

2008-04-02 Thread John W. Krahn
e-letter wrote: Readers, Hello, I have a csv file (greater than 256 columns hence unable to open in spreadsheet) of the following format: column header1, column header2, column header3 1,0.0e0,0.0e0,5e-6 2,0.0e0,0.0e0,6e-7 3,0.0e0,0.0e0,0.0e0 I want to perform: "if column headerx contains o

Re: delete columns csv file

2008-04-02 Thread Rob Dixon
e-letter wrote: > > I have a csv file (greater than 256 columns hence unable to open in > spreadsheet) of the following format: > > column header1, column header2, column header3 > 1,0.0e0,0.0e0,5e-6 > 2,0.0e0,0.0e0,6e-7 > 3,0.0e0,0.0e0,0.0e0 > > I want to perform: "if column headerx contains on

delete columns csv file

2008-04-02 Thread e-letter
Readers, I have a csv file (greater than 256 columns hence unable to open in spreadsheet) of the following format: column header1, column header2, column header3 1,0.0e0,0.0e0,5e-6 2,0.0e0,0.0e0,6e-7 3,0.0e0,0.0e0,0.0e0 I want to perform: "if column headerx contains only values of 0.0e0, delete

Re: Perl Stops Processing

2008-04-02 Thread Rob Dixon
Jenda Krynicky wrote: > > From: inthepickle <[EMAIL PROTECTED]> > >> Really quick question. In Perl, if I open a file in notepad >> system( "notepad.exe $file" ) ; >> Perl stops processes and will not continue until I close notpad. >> How can I open the file, and have Perl continue running? > > s

Re: PerlScript - FileSystemObject - Windows Scrpting Host

2008-04-02 Thread Jenda Krynicky
From: oscar gil <[EMAIL PROTECTED]> > Hello everybody, > > Can anyone tell me why this simple code does not work? > > > > > $objFSO = $WScript->CreateObject("Scripting.FileSystemObject"); > $objFile = $objFSO->CreateTextFile("test2.txt", ForWriting); > > $objFile->Writ

Re: Perl Stops Processing

2008-04-02 Thread Jenda Krynicky
From: inthepickle <[EMAIL PROTECTED]> > Really quick question. In Perl, if I open a file in notepad > system( "notepad.exe $file" ) ; > Perl stops processes and will not continue until I close notpad. > How can I open the file, and have Perl continue running? system(1, 'notepad.exe', $file) Jend

Re: Perl Stops Processing

2008-04-02 Thread Rob Dixon
inthepickle wrote: > > Really quick question. In Perl, if I open a file in notepad > system( "notepad.exe $file" ) ; > Perl stops processes and will not continue until I close notpad. > How can I open the file, and have Perl continue running? Quick question, slow answer. Perl will either spawn a

Re: Perl Stops Processing

2008-04-02 Thread yitzle
http://perldoc.perl.org/functions/system.html ... the parent process waits for the child process to complete. The return value is the exit status of the program as returned by the wait call. You want to first fork and run the command in its own thread. http://perldoc.perl.org/functions/fork.html

Perl Stops Processing

2008-04-02 Thread inthepickle
Really quick question. In Perl, if I open a file in notepad system( "notepad.exe $file" ) ; Perl stops processes and will not continue until I close notpad. How can I open the file, and have Perl continue running? -- To unsubscribe, e-mail: [EMAIL PROTECTED] For additional commands, e-mail: [EM

Net::SSH::Perl won't set SSH options?

2008-04-02 Thread RICHARD FERNANDEZ
Hi folks, I have a test script that remotely runs a command via SSH. The problem is that I get prompted to accept a host key if it's missing from my known_hosts file. The ssh option StrictHostKeyChecking if set to 'no' is supposed to accept a missing host key. I've tested this and it works from a

PerlScript - FileSystemObject - Windows Scrpting Host

2008-04-02 Thread oscar gil
Hello everybody, Can anyone tell me why this simple code does not work? $objFSO = $WScript->CreateObject("Scripting.FileSystemObject"); $objFile = $objFSO->CreateTextFile("test2.txt", ForWriting); $objFile->WriteLine("Hello"); I got this error: Error: (in

Net::SMTP::TLS results "EHLO command failed: 220 We do not authorize the use of this system to transport unsolicited, at cgicgi-akun.cgi line 855"

2008-04-02 Thread Patrik Hasibuan
Dear my friends... I am trying to sending an e-mail with Perl::CGI. But It does not work as I expect. This is the error message: EHLO command failed: 220 We do not authorize the use of this system to transport unsolicited, at cgicgi-akun.cgi line 855 line 855 contains: $smtp = Net::SMTP::TLS-

Re: week in a year

2008-04-02 Thread Rob Dixon
Jennifer G. wrote: > How do I know this day is in NO. which week in this year? > for example, Jan 1 is in the no.1 week of this year. > but how about the current day? It's a little more complicated than that. Week one is the first week in the year that has four or more days, so if Jan 1 falls on a

locate install C code module

2008-04-02 Thread anthony brooke
I had installed the Language::Prolog::Yaswi from http://search.cpan.org/~salva/Language-Prolog-Yaswi-0.14/Yaswi.pm but it is in C code implementation, normally when I install a perl module, it should be located at /usr/local/share/perl/5.8.8 but I can't see where is the Language::Prolog::Yaswi

Re: how to extract the last digit

2008-04-02 Thread Rob Dixon
[EMAIL PROTECTED] wrote: > > Thanks everyone for the help! > I get an error on 'chop' when I use the following. Why is this so? > Thanks > > use strict; > use warnings; > my @eightdecks = 1..20; > my $last = chop ($eightdecks[0] + $eightdecks[2]); > > if ($last =~ /[0-5]/){ > print "yes match

Re: how to look back past hour

2008-04-02 Thread Rob Dixon
Richard Lee wrote: > What is the best way to indicate past hour from current time without > using a module? > > so if it's 12:00, then 11:00-12:00 > > if it's 17:30 then 16:30 to 17:30 > > if it's 00:30 then 23:30 to 00:30 > > I wrote a below program and works but there has to be a better and

Re: dinamic cgi with perl

2008-04-02 Thread yitzle
I haven't learned AJAX yet (hopefully this summer), but I don't think you can do it exactly as you have envisioned. The CGI/Perl script runs on the server and produces some static HTML code which contains the AJAX. The script finishes. The HTML is sent to the browser. The browser then renders the H

Formbuilder - how to include other vars

2008-04-02 Thread Dermot
Hi, The CGI::FormBuilder mailing list is down. I am hoping someone on this list might have some experience with formbuilder and could offer some guidance. I want to set some variables that I can examine within the Template. It looks like with formbuilder all the variables have to set set via the

Re: dinamic cgi with perl

2008-04-02 Thread Pau Marc Munoz Torres
Hi is There some easy-understanding "how to use ajax with perl" tutorial somewhere? i just need to know how to do a cgi script to launch a prompt (javascript) and use the answer in my script please help!! pau -- Pau Marc Muñoz Torres Laboratori de Biologia Computacional Institut de Biotecn

Re: Perl Programmer in Yorkshire, UK?

2008-04-02 Thread Chas. Owens
On Wed, Apr 2, 2008 at 10:56 AM, Nigel Peck <[EMAIL PROTECTED]> wrote: > > Hi all, > > I need some paid help with various Perl projects that I have going and > don't have time to write all the code. Please let me know if you're > interested or know anyone who is but you must live in Yorkshire. >

Re: sort without ignoring hyphens

2008-04-02 Thread Matthew Whipple
LC_ALL=C sort echo.txt [EMAIL PROTECTED] wrote: On Mar 29, 3:19 pm, [EMAIL PROTECTED] (John W. Krahn) wrote: [EMAIL PROTECTED] wrote: When I do string comparisons in perl the strings seem to ignore the embedded hyphens. I want to sort strings assuming the 'dictionary' order of the char

Perl Programmer in Yorkshire, UK?

2008-04-02 Thread Nigel Peck
Hi all, I need some paid help with various Perl projects that I have going and don't have time to write all the code. Please let me know if you're interested or know anyone who is but you must live in Yorkshire. Sorry if this is the wrong list for this. Cheers, Nigel Managing Director MIS

Re: week in a year

2008-04-02 Thread John W. Krahn
Jennifer G. wrote: How do I know this day is in NO. which week in this year? for example, Jan 1 is in the no.1 week of this year. but how about the current day? It depends on how you define "week". The simple answer is: $ perl -le'print int( ( localtime )[ 7 ] / 7 )' 13 Perhaps have a look

Re: week in a year

2008-04-02 Thread Rob Coops
If you are calculating it your self and assuming you are intrested in the ISO defenition of the week number: http://www.proesite.com/timex/wkcalc.htm Of course there are modules on CPAN that do the same but then again, if all you want to know is the number of the week it might be simpler to calcul

Can't locate object method "gif" via package "GD::Image"

2008-04-02 Thread sivasakthi
Hi all, I have installed Perl-GD , and tried to use the GD::Image it throws the following error message , Can't locate object method "gif" via package "GD::Image" how can i eliminate the above error? Thanks,

week in a year

2008-04-02 Thread Jennifer G.
How do I know this day is in NO. which week in this year? for example, Jan 1 is in the no.1 week of this year. but how about the current day? Thanks. -- To unsubscribe, e-mail: [EMAIL PROTECTED] For additional commands, e-mail: [EMAIL PROTECTED] http://learn.perl.org/

RE: how to extract the last digit

2008-04-02 Thread Jenda Krynicky
From: "sanket vaidya" <[EMAIL PROTECTED]> > You get the error on chop because anything given with chop function is > considered as string (In other words chop acts on string). So perl considers > the '+' operator you provide with chop as string rather than addition > operator.This is how your task

Re: how to extract the last digit

2008-04-02 Thread Jenda Krynicky
From: <[EMAIL PROTECTED]> > Thanks everyone for the help! > I get an error on 'chop' when I use the following. Why is this so? > Thanks > > use strict; > use warnings; > my @eightdecks = 1..20; > my $last = chop ($eightdecks[0] + $eightdecks[2]); Because chop() attempts to modif

RE: how to extract the last digit

2008-04-02 Thread sanket vaidya
Hi You get the error on chop because anything given with chop function is considered as string (In other words chop acts on string). So perl considers the '+' operator you provide with chop as string rather than addition operator.This is how your task can be accomplished. use warnings; use stric

RE: simple reg ex matching

2008-04-02 Thread Thomas Bätzler
<[EMAIL PROTECTED]> wrote: > ok, I found my error, it should be as follows if I want to > match number 6:- my $_ = 62; if( $_ =~ /^6$/){ Of course you could also just use "if( $_ == 6 )". HTH, Thomas -- To unsubscribe, e-mail: [EMAIL PROTECTED] For additional commands, e-mail: [EMAIL PROTECTED

Re: simple reg ex matching

2008-04-02 Thread itshardtogetone
ok, I found my error, it should be as follows if I want to match number 6:- my $_ = 62; if( $_ =~ /^6$/){ - Original Message - From: <[EMAIL PROTECTED]> To: Sent: Wednesday, April 02, 2008 5:07 PM Subject: simple reg ex matching Hi, The value of $_ is 62. In the script below, I just

RE: how to write 0 to 10 in reg exp.

2008-04-02 Thread sanket vaidya
Here is the code to match 0 to 10 using regex. use warnings; use strict; print "Enter any number:"; my $input = ; chomp($input); if($input=~ m/^10$|^[0-9]$/) { print "matched"; } else { print "not matched"; } Hope it helps. -Original Message- From: [EMAIL PROTECTED] [mailto:[EMAIL P

simple reg ex matching

2008-04-02 Thread itshardtogetone
Hi, The value of $_ is 62. In the script below, I just wonder why the default variable match the number 6. What I wanted to say is that if the default variable $_ holding the value of 62, if match the number 6, then print Yes match. So what is the right way to right. Thanks use strict; use warn

Re: how to write 0 to 10 in reg exp.

2008-04-02 Thread Jeff Pang
try this one: # perl -Mstrict -le 'my $x=shift; print 1 if $x=~/^[0-9]$|^10$/' 10 1 On 4/2/08, [EMAIL PROTECTED] <[EMAIL PROTECTED]> wrote: > Hi, > How do I write the expression, if the variable match between 0 to 10? Below > is the wrong expression I wrote which is suppose to be if $eightdec

how to write 0 to 10 in reg exp.

2008-04-02 Thread itshardtogetone
Hi, How do I write the expression, if the variable match between 0 to 10? Below is the wrong expression I wrote which is suppose to be if $eightdecks match 0 to 10. So i want the answer to be yes. Thanks my $eightdecks = 6; if($eightdecks =~ /[0-10]/){ print "Yes match\n"; }else{print "no"};

Re: how to extract the last digit

2008-04-02 Thread itshardtogetone
Thanks everyone for the help! I get an error on 'chop' when I use the following. Why is this so? Thanks use strict; use warnings; my @eightdecks = 1..20; my $last = chop ($eightdecks[0] + $eightdecks[2]); if ($last =~ /[0-5]/){ print "yes match.\n"; }else{print "not match\n"}; - Origi