This is an excerpt from the latest version perlfaq7.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 .

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

7.19: What's the difference between deep and shallow binding?

In deep binding, lexical variables mentioned in anonymous subroutines
are the same ones that were in scope when the subroutine was created. In
shallow binding, they are whichever variables with the same names happen
to be in scope when the subroutine is called. Perl always uses deep
binding of lexical variables (i.e., those created with my()). However,
dynamic variables (aka global, local, or package variables) are
effectively shallowly bound. Consider this just one more reason not to
use them. See the answer to "What's a closure?".

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

I am involved with a project that will use a server process written in C
and a client written in Perl. The processes will communicate over a
network socket that is opened when the Perl process starts and and remains
open throughout the life of the Perl program.

The server is queried by the Perl program and responds with short text
strings that are newline terminated. The server can return from one to
three lines depending on the query. This part is working well.

Here is where I am running into trouble. I am using the diamond
operator to read from the socket as in:

while (<$socket>) {
chomp;
print "$_\n";
}

however, the diamond operator doesn't return despite trying to send a NULL
string from the C program through the socket. Here is a snippet of my C
program:

fprintf(fout, "");
fflush(fout);

Hello all,

Is there a way using perl code to check what platform the script is
running on? I have a script that runs on both windows and unix
platforms and I want to check what platform the script is running on
because I will be executing different sections of the code depending
on the platform.

Thanks!

This is an excerpt from the latest version perlfaq7.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 .

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

7.28: How do I clear a package?

Use this code, provided by Mark-Jason Dominus:

Hello all,
I'm trying to search and replace the value of a tag in an xml file.
I'm not in a position to use the usual XML parsers as the version of
Perl I'm required to use
doesnt contain any of the XML libraries. I can use Text::Balanced, but
I want to deal with the xml file on a
line-by-line basis, as the value of my tag could strecth over multiple-
lines.

Perl Version:
This is perl, v5.8.7 built for sun4-solaris

Sample xml file:
-------------------------



1.0.0


invalid version

hi all,

i have a file in which there are 8 byte hex values one followed by
another. For example:
2A414364
00001DA9
01A3F9DD
3FFFF661
00EE6670
000011CF
2BC43FD0
3FEB0003
3F7FFF40

I have the following expression in my Perl script:

if (/^"([^\,].+)"\,"$/)

Although I know that it is checking to see if the string starts with
some characters, it is not working for my input file.

Can someone explain to me in english what it is doing???

Thanks in advance.

Hello!

I have this book, but I couldn't located the template download that
describe in the book. Could anyone point me to the download link for
the template? I appreciate for your help.

------------Book information------
Perl Database Programming
by Brent Michalski ISBN:0764549561
John Wiley & Sons © 2003 (552 pages)
Here is an in-depth guide to creating database-driven applications
using Perl

still just me yahoo.com> wrote:

Any reason why not simply adding the perl bin directory to the path
permanently?
Control Panel -> System -> Advanced -> Environment Variables

jue

This is an excerpt from the latest version perlfaq7.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 .

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

7.22: What's the difference between calling a function as &foo and foo()?

When you call a function as &foo, you allow that function access to your
current @_ values, and you bypass prototypes. The function doesn't get
an empty @_--it gets yours! While not strictly speaking a bug (it's
documented that way in perlsub), it would be hard to consider this a
feature in most cases.

When you call your function as "&foo()", then you *do* get a new @_, but
prototyping is still circumvented.