Beefy Boxes and Bandwidth Generously Provided by pair Networks
XP is just a number
 
PerlMonks  

Re^5: How to print out package code ?

by choroba (Abbot)
on Mar 18, 2013 at 21:50 UTC ( #1024159=note: print w/ replies, xml ) Need Help??


in reply to Re^4: How to print out package code ?
in thread How to print out package code ?

Why did you introduce @tab and the inner loop? This works for me:

open MODULE, "perldoc -m ModuleX |" or die "Failed to open pipeline($! +)"; open(X,"> xxx_dump.txt")|| warn "Fail: ($!)"; while (<MODULE>) { print X $_; } close X; close S;
لսႽ ᥲᥒ⚪⟊Ⴙᘓᖇ Ꮅᘓᖇ⎱ Ⴙᥲ𝇋ƙᘓᖇ


Comment on Re^5: How to print out package code ?
Download Code
Re^6: How to print out package code ?
by Martin90 (Sexton) on Mar 18, 2013 at 22:14 UTC
    Yes you are right, it works but not for my module which before is attached to script is decompiled by .so file. Have you got good solution for this case ?

      Martin90:

      If it's a module found on CPAN, you can always download the package, untar it and brows the source to your hearts content.

      ...roboticus

      When your only tool is a hammer, all problems look like your thumb.

        No it is not from CPAN it's customized module which contain obfuscated code like "ufboisbfljsbf" and before is used in script first is decoded by .so files. I need to do changes in subroutines from this module. Any debugging fails at the moment when module is loading. Have you got good advice ? At least I want to get subroutines code from this module.

Log In?
Username:
Password:

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

How do I use this? | Other CB clients
Other Users?
Others lurking in the Monastery: (7)
As of 2014-10-20 05:02 GMT
Sections?
Information?
Find Nodes?
Leftovers?
    Voting Booth?

    For retirement, I am banking on:










    Results (72 votes), past polls