| Server IP : 82.208.35.60 / Your IP : 216.73.216.89 Web Server : Apache/2.4.55 (FreeBSD) OpenSSL/1.1.1q-freebsd PHP/7.3.31 System : FreeBSD server7.d2m.cz 12.4-RELEASE-p9 FreeBSD 12.4-RELEASE-p9 GENERIC amd64 User : studiokobylisy_cz ( 1008) PHP Version : 7.3.31 Disable Function : NONE MySQL : OFF | cURL : ON | WGET : OFF | Perl : OFF | Python : OFF | Sudo : OFF | Pkexec : OFF Directory : /usr/ports/devel/p5-B-Debug/ |
Upload File : |
Walk Perl syntax tree, printing debug info about ops
Without actually executing a Perl 5 program, you can walk its optree:
$ cat hello.pl
print "Hello world!\n";
$ perl -MO=Debug hello.pl
hello.pl syntax OK
LISTOP (0x55d1520414f8)
op_ppaddr 0x55d1520414f8 LISTOP [OP_LEAVE]
op_next 0x0
op_sibling 0x0
op_targ 1
...
OP (0x55d1520414c8)
op_ppaddr 0x55d1520414c8 OP [OP_ENTER]
op_next 0x55d152041538 COP [OP_NEXTSTATE]
op_sibling 0x55d152041538 COP [OP_NEXTSTATE]
op_targ 0
...