Beefy Boxes and Bandwidth Generously Provided by pair Networks
go ahead... be a heretic
 
PerlMonks  

Re^9: Experimental features: autoderef vs postfix deref

by golux (Chaplain)
on Jul 14, 2015 at 18:01 UTC ( #1134770=note: print w/replies, xml ) Need Help??


in reply to Re^8: Experimental features: autoderef vs postfix deref
in thread Experimental features: autoderef vs postfix deref

RonW,

I also have a C background, and agree about "state" variables being the Perl equivalent of C "static" variables.

Using "state" simplifies cases like the following where one shouldn't have to remember to print an HTML header, but also doesn't want it more than once:

#!/usr/bin/perl use strict; use warnings; use feature qw{ state }; sub html { my ($text) = @_; # Make the header idempotent state $b_header++ or print "Content-type: text/html\n\n"; print $text; } html("<br>This is some html, prior to which a header is printed\n"); html("<br>This is too (but the header was printed already)\n");

Output:

Content-type: text/html <br>This is some html, prior to which a header is printed <br>This is too (but the header was printed already)
say  substr+lc crypt(qw $i3 SI$),4,5

Log In?
Username:
Password:

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

How do I use this? | Other CB clients
Other Users?
Others browsing the Monastery: (10)
As of 2020-11-24 21:45 GMT
Sections?
Information?
Find Nodes?
Leftovers?
    Voting Booth?

    No recent polls found

    Notices?