Hi Guys,
I am learning the object::insideout model now and can't find mush materials on
website. Do anyone know how to declare a hash data as attribute in object field
and how to use it.
I have example show below, but it seems not work properly. why the "first_para"
didn't show it's def
Dear Chas,
Thanks so much, The problem fixed now. It has annoyed me for two days.
Cheers
Org
> Date: Sun, 15 Feb 2009 20:56:51 -0500> Subject: Re: strange string match>
> From: chas.ow...@gmail.com> To: org.c...@live.com.au> CC: beginners@perl.org>
> > On Sun,
Hi,
I am coding a script to read a pure txt fiel and show it. I can't understand
why any lines in the file match the word of "[DIED]".
Thanks
Org
the txt file is like this:
Fri Feb 13 14:31:26 2009[PROCESS]: Welcome to our system![ERROR]: Please
is much efficient, such as sorting.
It is nice there is a place we can discuss these issus.
Org.
> Date: Wed, 10 Dec 2008 02:59:47 +> From: [EMAIL PROTECTED]> To:
> beginners@perl.org> CC: [EMAIL PROTECTED]> Subject: Re: how to release memory
> from a hash table
Dear perl users,
I read a large file into a hash table. This hash table is used only once in the
subroutine. I am very concern the memory usage, So I plan to realse the memory
after used the hash table. The way I used is:
my %hash = ();
#read the large file into the hash table
...
#relea
rom: [EMAIL PROTECTED]> To: [EMAIL
PROTECTED]> Subject: Re: Tie::FILE vs open> CC: beginners@perl.org> > On Mon,
Sep 29, 2008 at 12:34 PM, org chen <[EMAIL PROTECTED]> wrote:> >> > I have a
huge file, there are 47,286,116 lines. I am search a line and repalce this li
I have a huge file, there are 47,286,116 lines. I am search a line and repalce
this line with another string. I know this line is between 20,000,000th to
30,000,000th lines. Which way is more fast and safe:
method 1:
use Tie::FILE;
tie my @array, 'Tie""File', "aa.txt", memory =>100_000_000 or
Hi, There is an string, if each letter in the string is not belong to
[a-z][A-Z][0-9], I want to change it to "+".
eg. my $str = "3ijZ()a";if($str !~ /[a-z][A-Z][0-9]/){add code here}print
$str; #output will be: 3ijZ++a please help me complete this code. Thanks
org
_
Hi, There is an string, if each letter in the string is not belong to
[a-z][A-Z][0-9], I want to change it to "+". eg. my $str = "3ijZ()a";if($str !~
/[a-z][A-Z][0-9]/){add code here}print $str; #output will be: 3ijZ++a please
help me complete this code. Thanksorg
