Hello,

I need to keep track of a list of items in my package/object;
currently, I am going about it like this:

sub new {
my $self = { _listofstuff => undef };
bless $self;
return $self;
}
sub dostuff {
my $self =shift;
for (my $i=0; $i<10 ;$i++) {
push @{$self->{_listofstuff}), "listitem";
}
}

Is there a better way? Using '$self->underscored-hash-item' is
tedious, but I am willing to deal with it; however, having to treat
this hash element as an array in order to use it as such (rather than
declaring it as an array to begin with) seems hackish. I would very
much love to just see '@listofstuff'.

This is an excerpt from the latest version perlfaq4.pod, which
comes with the standard Perl distribution. These postings aim to
reduce the number of repeated questions as well as allow the community
to review and update the answers. The latest version of the complete
perlfaq is at http://faq.perl.org .

--------------------------------------------------------------------

4.14: How can I compare two dates and find the difference?

(contributed by brian d foy)

You could just store all your dates as a number and then subtract. Life
isn't always that simple though. If you want to work with formatted
dates, the "Date::Manip", "Date::Calc", or "DateTime" modules can help
you.

--------------------------------------------------------------------

gmail.com> wrote in comp.lang.perl.misc:

It seems to me the doc supposes (but doesn't explicitly say so) the
user is trying to perform a line-by-line dialog with the program.

On Dec 10, 12:06 pm, hmchkus wrote:

To process MIME encoded messages try the MIME::* modules.

To remove HTML from a string see FAQ: "How do I remove HTML from a
string?"

i have two words for you: 'event loop'. i would never run long running
subprocesses and try to deal with their stdio without an event
loop. then you never have to worry about deadlock.

uri

Jim Carlock wrote:

I've always been under the impression that Perl, like many modern
languages, was first complied into an intermediate code and then the
intermediate code was interpreted.

Barry Margolin wrote:

Jim Carlock 127.0.0.1> wrote:

The name of the language is "Perl", not "PERL".

[ snip - Perl is a "compile-and-go" type of "interpreter". ]

While books are really nice (particularly when the author is my boss :-),
the Ultimate Authority is the docs that come with the software.

From the perlrun.pod Perl docs:

After locating your program, Perl compiles the entire program to an
internal form. If there are any compilation errors, execution of the
program is not attempted. (This is unlike the typical shell script,
which might run part-way through before finding a syntax error.)

Hi all

Take these for example;

$var="3.14"
$var2="100"

$pi="3.1415926535897932384626"
$large = "30003213000000000000"

Q1
how to convent these to number explicit?
I means I don't care precision now.

Q2
Is there exist some high precision soluation module ?
support operation like * + sin() etc.

appreciate
key9

.
.
while ($name =~ /[^A-Z]{3,9}/) {
print "Invalid, try again: ";
chop($name = uc );
}

Of course that is wrong.

The user must try again if this is true: $name =~ /[^A-Z]/
and this is false: $name =~ /.*{3,9}/