about Excel modules

hi,Lists, I use Spreadsheet::WriteExcel / Spreadsheet::ParseExcel modules to access and write excel files. The questions is, how to move the cursor in some a column to the top of next column?Thanks. Merry Xmas! :-)

Re: How to promote the efficiency

very fast,get the results in 20 minutes.Thanks for all. On 12/9/05, John W. Krahn <[EMAIL PROTECTED]> wrote: > > Jennifer Garner wrote: > > Hi,John > > Hello, > > > I think you have understanded wrongly with my meaning. > > The result of $low{

Re: How to promote the efficiency

2.33.44.55 Now I only want the uniq times of all IP appeared,this is 5. On 12/8/05, John W. Krahn <[EMAIL PROTECTED]> wrote: > > Jennifer Garner wrote: > > hi,lists, > > Hello, > > > I have a file which is so large,which looking as: > > > > 61.156.49.18:

Re: How to promote the efficiency

Thank you for John.I think your method would be much faster than mine. Now I'm going to rewrite this program with C language,but I'll test it using all the ways given by everyone here.Thanks. On 12/8/05, John W. Krahn <[EMAIL PROTECTED]> wrote: > > Jennifer Garner wrote: &

Re: How to promote the efficiency

Sorry, the file is more than 900M, too large to download. I have run it for one day,and still have nothing to output.Crying... I think maybe some arithmetic is useful for me,and now I'm thinking over it. On 12/8/05, Xavier Noria <[EMAIL PROTECTED]> wrote: > > On Dec 8, 2005,

How to promote the efficiency

hi,lists, I have a file which is so large,which looking as: 61.156.49.18:28360 61.183.148.130:27433 222.90.207.251:25700 202.117.64.161:25054 218.58.59.73:24866 221.233.24.9:22507 222.187.124.4:21016 ... and more than 4500 lines. the part after ":" is no use for me,I only need the IP. for

Re: A Strange Syntax

Thanks for Adriano Ferreira.Your explaination is good for me.I have known that. On 12/7/05, Adriano Ferreira <[EMAIL PROTECTED]> wrote: > > On 12/5/05, Jennifer Garner <[EMAIL PROTECTED]> wrote: > > As we know, $::{sym} == *main::sym, it's a typeglob. > > bu

Re: which is more effective between map and foreach?

know clearly.Can you help me on this? On 12/6/05, Bob Showalter <[EMAIL PROTECTED]> wrote: > > Jennifer Garner wrote: > > Hi,lists, > > > > I have a small script,when it run,it generate much more lines and put > > them > > into a file. >

which is more effective between map and foreach?

Hi,lists, I have a small script,when it run,it generate much more lines and put them into a file. The code for printing I writed: map { print RESULT $_,":",$ips{$_},"\n" } sort { $ips{$b} <=> $ips{$a} } keys %ips; Certainly, I can write that code with foreach style. I want to know which

Re: A Strange Syntax

${*{$::{sym}}{HASH}}{name}; As we know, $::{sym} == *main::sym, it's a typeglob. but what is **main::sym? and the same,what is *{$glob}?thanks. On 12/6/05, Flemming Greve Skovengaard <[EMAIL PROTECTED]> wrote: > > Wiggins d'Anconia wrote: > > > > Now that you understand it, replace it with $sym-

A Strange Syntax

Hi,lists, Seeing this code please: our %sym = ( name => 'flower', age => 23, ); print ${*{$::{sym}}{HASH}}{name}; The result of printing is : flower. How to analyse the last sentence of that code?Thanks.

Re: what use of the closure?

]> wrote: > > On 2 Dec 2005 at 23:44, Jennifer Garner wrote: > > > Hi,lists, > > > > I usually meet some problems of closure when do development under > > mod_perl. Can anyone tell me that what use of a closure in > > perl?thanks. > > Have a look at this

Re: recursive search

#!/usr/local/bin/perl # # recurs.pl # # This script executes recursively on subdirs the command you supply as a parameter # # Run "program -h" to see the run options # # Last modified: Apr 10 1997 # Author: Bekman Stas <[EMAIL PROTECTED]>; # <[EMAIL PROTECTED]>; $|

what use of the closure?

Hi,lists, I usually meet some problems of closure when do development under mod_perl. Can anyone tell me that what use of a closure in perl?thanks.

Re: how to hide passwd from INPUT

Thanks for John and all. On Tue, Nov 29, 2005 at 10:53 PM, John Doe wrote: Jennifer Garner am Dienstag, 29. November 2005 15.40: HI,Lists, Sorry, this time I can't login into my primary mailbox of 30gigs.So I change another email for this question. When I get something from input su

how to hide passwd from INPUT

HI,Lists, Sorry, this time I can't login into my primary mailbox of 30gigs.So I change another email for this question. When I get something from input such as: my $passwd=; the password typed on screen is clear plain text.How can I get it input as hide type such as ***?Thanks. --- Jenn

Re: Re: how to get file's creation time

Thanks for Schwartz and Jay.I have known something from your words. On 28 Nov 2005 08:48:28 -0800, merlyn@stonehenge.com (Randal L. Schwartz) wrote: >> "Jay" == Jay Savage <[EMAIL PROTECTED]> writes: > > Jay> It depends on what you mean by "creation". stat() on POSIXish systems > Jay> return

how to get file's creation time

hi, How to get file's creation time,NOT last modify time?Thanks. -- To unsubscribe, e-mail: [EMAIL PROTECTED] For additional commands, e-mail: [EMAIL PROTECTED]

Re: Re: about deleting subroutine

W. Sims" <[EMAIL PROTECTED]> wrote: > Jennifer Garner wrote: >> hi,lists, > > Hi Jennifer, > >> I have seen this thread on perlmonk,and it make me confused too.Can > anyone here explain that?Thanks. >> >> Quote: >> --- >> Basically, del

about deleting subroutine

hi,lists, I have seen this thread on perlmonk,and it make me confused too.Can anyone here explain that?Thanks. Quote: --- Basically, deleting subroutines from a symbol table seems a bit buggy, but I don't know if this behavior is documented or not. #!/usr/bin/perl -l sub this { 'this' } pr

Re: Re: help explaining for this script

Thanks for Jeff's explaining.I'm appreciated for that. On Tue, 15 Nov 2005 18:48:40 -0500 (EST), Jeff 'japhy' Pinyan <[EMAIL PROTECTED]> wrote: > On Nov 15, Jennifer Garner said: > >> I can't understand for this script below,I want somebody her

help explaining for this script

Hi,lists, I can't understand for this script below,I want somebody here to give me some help.Thanks. sub is_tainted{ my $var=shift; my $blank=substr($var,0,0); return not eval {eval "1 || $blank" || 1}; } That subroutine estimate for if some given var is tainted or not.But I can't