Beefy Boxes and Bandwidth Generously Provided by pair Networks
P is for Practical
 
PerlMonks  

Re: What are multiple $_[0] =~ operations doing?

by polettix (Vicar)
on Apr 01, 2005 at 10:14 UTC ( #444135=note: print w/replies, xml ) Need Help??


in reply to What are multiple $_[0] =~ operations doing?

The binding operator - er - binds an operation to be performed to a particular variable instead of $_. I did find this rather confusing at the beginning, because I used to read this as some kind of assignment. See this as if you're assigning "an operation" to the variable.

As for the use of $_[0], Perl passes variables by reference instead of value, which means that you can modify (if possible) the actual variables that are passed to a function. Thus:

sub double_it { $_[0] *= 2; } my $x = 1; print "\$x is $x\n"; double_it($x); print "\$x now is $x\n";
will multiply $x by two, ending up with the following output:
$x is 1 $x now is 2
The piece of code you proposed seems some implementation of a templating system; each substitution command replaces occurrences of some placeholder (like %HTTP_HOST%) with the value given by a call to the handleEnvVariable sub with the given parameter (a call to a function is allowed inside the substitution part due to the "e" modifier).

Flavio (perl -e "print(scalar(reverse('ti.xittelop@oivalf')))")

Don't fool yourself.

Log In?
Username:
Password:

What's my password?
Create A New User
Node Status?
node history
Node Type: note [id://444135]
help
Chatterbox?
and the web crawler heard nothing...

How do I use this? | Other CB clients
Other Users?
Others cooling their heels in the Monastery: (2)
As of 2021-01-18 01:50 GMT
Sections?
Information?
Find Nodes?
Leftovers?
    Voting Booth?
    Notices?