Re^4: e


There's more than one way to do things
	PerlMonks

Re^4: e

by shmem (Chancellor)

on Sep 13, 2015 at 09:47 UTC ( [id://1141812]=note: print w/replies, xml )

Need Help??

in reply to Re^3: e
in thread e

$=[!print$=]=!map{$==$=[$#z]+=$=[@z]/@z,($=[@z]%=1+$#z--).=0}@z=@=for@ +==(1)x pop
[download]

Segfaults with perl v5.18.2:

qwurx [shmem] ~> perl -e '$=[!print$=]=!map{$==$=[$#z]+=$=[@z]/@z,($=[
+@z]%=1+$#z--).=0}@z=@=for@==(1)x pop' 10
Attempt to free unreferenced scalar: SV 0xdd0968, Perl interpreter: 0x
+da4010 at -e line 1.
Segmentation fault
[download]

Works with v5.10.1 though. Looks like the segfault happens here:

$=[@z]%=1+$#z--).=0
[download]

Can't (for now) figure out why.

perl -le'print map{pack c,($-++?1:13)+ord}split//,ESEL'

Comment on Re^4: e Select or Download Code

In Section Obfuscated Code

Domain Nodelet^?

www.com | www.net | www.org

Node Status^?

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

Chatterbox^?

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

Other Users^?

Others scrutinizing the Monastery: (5)

As of 2024-04-23 21:41 GMT

Sections^?

Information^?

Find Nodes^?

Leftovers^?

Today I Learned

Voting Booth^?

No recent polls found