PL文件打开后乱码（求解决）

slowss

#! /usr/bin/perl
use ByteLoader 0.06;
PLBCi686-linux 0.06       Nmain::die_and_exit 
`     ]R
        

   Q      ./guestbook/index.pl    W   [O   Nmain::loginid 
`     ]R
        
   Q   W   [   Nmain::printPaging2 
`     ]R
        
   Q   W   [   Nmain::_debug 
`     ]R
        
   Q    W   [w   Nmain::global 
`     ]R
        

   Q   W   [   Nmain::encodeURL 
`     ]R
        
   Q
   W   [e   Nmain::dbconn_sqlite 
`     ]R
        
   Q   W   [N   Nmain::MAC2IP 
`     ]R
           PIO::Handle       IO::Handle    C      
   L   &<          (   *   ,   
   Q   X   W   [B   Nmain::skin_schema 
`     ]R
        
   Q   W   [   Nmain::hf_errcode 
`     ]R
        
   Q   W   [   Nmain::dbquery 
`     ]R
        
   Q   W   [r   Nmain::loadTemplate 
`     ]R
        
   Q   W   [   Nmain::tb 
`     ]R
        
   Q   W   [   Nmain::module_name 
`     ]R
        
    Q!   W   [   Nmain::_</usr/lib/perl5/5.8.8/CGI.pm 
`  ?  R
        /usr/lib/perl5/5.8.8/CGI.pm 
"   Q#   W   [   Nmain::dbh 
`     ]R
        
$   Q%   W   [   
用记事本打开后显示如上，不知是用什么加了密，能编译过来吗？
我把文件上传上来，高手有时间的帮我看下，谢谢！！

wxlfh

应该是编码问题了，你问一下写这个脚本的人好了。

slowss

非常感谢你的回复，我想应该不是编码的问题！！
但不管怎样，谢谢你，因为你很热心！！！

flw

这是 Perl 的魔术。
perldoc ByteLoader 即可。

slowss

不知你所说的perldoc ByteLoader要怎么搭建这样的环境呢，能说得详细点吗？

flw

http://search.cpan.org/~nwclark/ ... oader/ByteLoader.pm

wxlfh

受教，受教，呵呵。

johnrobbet

This module is used to load byte compiled perl code as produced by perl -MO=Bytecode=.... It uses the source filter mechanism to read the byte code and insert it into the compiled code at the appropriate point.

ByteLoader 用来执行perl编译完的二进制文件，类似于用java的执行class文件，对吧。但是怎么样从perl脚本文件得到这个二进制文件呢？又怎么从二进制文件反编译得到源程序呢？如果我理解的没错，这个应该可以用来隐藏perl程序的源代码。

slowss

呵呵，到今天还没搞定，不知怎么还原回来，上面有我发的原文件，不知哪位高手给反编回来呢，并做个详细教程，谢谢了！！！！

inchonline

我也有这样的疑问，不知哪位高手给反编回来呢，并做个详细教程