RE: [Perl-unix-users] Greedy Matching

2004-03-18 Thread Parvez Pathan
Hi Al, Thanks a lot!! I have been able to solve my problem and have also learnt a lot from all these inputs. Thanks once again. Parvez -- - Original Message - DATE: Thu, 18 Mar 2004 08:02:41 From: "Elston, Jeremy" <[EMAIL PROTECTED]> To: "'[EMAIL PROTECTED]'" <[EMAIL PROTEC

Re: [Perl-unix-users] Net::FTP question

2004-03-18 Thread Anthony Ettinger
--- [EMAIL PROTECTED] wrote: > Hello all. > > I'm trying to return the "ls" method from Net::FTP > to an array like so: > @myarray = $FTP->ls() ; > > foreach (@myarray) { > print "$_\n"; > } > > However, I'm getting in return the following : > ARRAY(0x2046a1a0) Try print "@{$_}\n"; = Ant

RE: [Perl-unix-users] Net::FTP question

2004-03-18 Thread Wagner, David --- Senior Programmer Analyst --- WGO
[EMAIL PROTECTED] wrote: > Hello all. > > I'm trying to return the "ls" method from Net::FTP to an array like > so: @myarray = $FTP->ls() ; Change @myarray to $myarray > > foreach (@myarray) { @{$myarray} for @myarray > print "$_\n"; > } > > However, I'm getting in return the fo

[Perl-unix-users] Net::FTP question

2004-03-18 Thread vaughnte
Hello all. I'm trying to return the "ls" method from Net::FTP to an array like so: @myarray = $FTP->ls() ; foreach (@myarray) { print "$_\n"; } However, I'm getting in return the following : ARRAY(0x2046a1a0) Can someone point out the problem here ? TEV

[Perl-unix-users] System IO load testing

2004-03-18 Thread Craig Sharp
I need to come up with a way to do heavy system IO and processor load testing on a new enterprise storage and blade server combination. I would like to do this in Perl but I have no idea how or even if Perl can help me do this. The testing must load the devices to as near max as possible. Any h

Re: [Perl-unix-users] Greedy Matching

2004-03-18 Thread Anthony Ettinger
Parvez, I was a little unclear what you wanted, but judging from your comment, you only want to replace / with _ on the last occurance of /: see 'perldoc perlre' for the nitty gritty also 'perldoc perlretut' == code == #!/usr/bin/perl