Re: Avoiding Global Vars


Pathologically Eclectic Rubbish Lister
	PerlMonks

by bv (Friar)

on Sep 22, 2009 at 16:17 UTC ( #796746=note: print w/replies, xml )

Need Help??

You could wrap it in a block:

{
  my $max;
  while(<>)
  {
    $max = ($max >= $_ ? $max : $_);
    print "Max seen: $max\n";
  }
}
[download]

Or use a state variable (Perl 5.10 or 6 only, I believe)

print pack("A25",pack("V*",map{1919242272+$_}(34481450,-49737472,6228,0,-285028276,6979,-1380265972)))

Comment on Re: Avoiding Global Vars Select or Download Code

Domain Nodelet^?

Node Status^?

node history
Node Type: note [id://796746]
help

Chatterbox^?

How do I use this? • Last hour • Other CB clients

Other Users^?

Others romping around the Monastery: (4)

As of 2023-12-02 06:16 GMT

Sections^?

Information^?

Find Nodes^?

Leftovers^?

Voting Booth^?

Notices^?