On Mon, Jun 16, 2003 at 11:39:30PM -0700 Harry Putnam wrote:
> "Charles K. Clarkson" <[EMAIL PROTECTED]> writes:
>
> >
> > $$line =~ s/[Ss]ource/Src/g;
> > $$line =~ s/[Dd]estination/Dst/g;
> > $$line =~ /^[^ ]+, (\d[^ ]+ \d[^ ]+).*(Src[^ ]+ \d+).*(Dst[^ ]+
>
> Where do I look for the details on the meaning of the double `$'?
In perlref.pod. $$line is a short-cut for ${ $line }. The function from
which the above snippet was extracted took a reference to a scalar as
first argument (in order to change the argument in place). $$line
dereferences that to get the actual value it referred to.
Tassilo
--
$_=q#",}])!JAPH!qq(tsuJ[{@"tnirp}3..0}_$;//::niam/s~=)]3[))_$-3(rellac(=_$({
pam{rekcahbus})(rekcah{lrePbus})(lreP{rehtonabus})!JAPH!qq(rehtona{tsuJbus#;
$_=reverse,s+(?<=sub).+q#q!'"qq.\t$&."'!#+sexisexiixesixeseg;y~\n~~dddd;eval
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
