From owner-freebsd-questions  Wed Oct  3  9:42: 0 2001
Delivered-To: freebsd-questions@freebsd.org
Received: from tomts13-srv.bellnexxia.net (tomts13.bellnexxia.net [209.226.175.34])
	by hub.freebsd.org (Postfix) with ESMTP id 7929037B405
	for <freebsd-questions@FreeBSD.ORG>; Wed,  3 Oct 2001 09:41:57 -0700 (PDT)
Received: from xena.gsicomp.on.ca ([65.93.38.74])
          by tomts13-srv.bellnexxia.net
          (InterMail vM.4.01.03.16 201-229-121-116-20010115) with ESMTP
          id <20011003164156.GRUC12483.tomts13-srv.bellnexxia.net@xena.gsicomp.on.ca>;
          Wed, 3 Oct 2001 12:41:56 -0400
Received: from localhost (matt@localhost)
	by xena.gsicomp.on.ca (8.11.1/8.11.1) with ESMTP id f93GZAd11674;
	Wed, 3 Oct 2001 12:35:11 -0400 (EDT)
	(envelope-from matt@xena.gsicomp.on.ca)
Date: Wed, 3 Oct 2001 12:33:55 -0400 (EDT)
From: Matthew Emmerton <matt@gsicomp.on.ca>
To: Andre` Niel Cameron <AndreC@Axxs.net>
Cc: free bsd <freebsd-questions@FreeBSD.ORG>
Subject: Re: Perl question
In-Reply-To: <012101c14c28$d7aa9c90$a50410ac@olmct.net>
Message-ID: <Pine.BSF.4.21.0110031232230.11649-100000@xena.gsicomp.on.ca>
MIME-Version: 1.0
Content-Type: TEXT/PLAIN; charset=X-UNKNOWN
Content-Transfer-Encoding: QUOTED-PRINTABLE
Sender: owner-freebsd-questions@FreeBSD.ORG
Precedence: bulk
List-ID: <freebsd-questions.FreeBSD.ORG>
List-Archive: <http://docs.freebsd.org/mail/> (Web Archive)
List-Help: <mailto:majordomo@FreeBSD.ORG?subject=help> (List Instructions)
List-Subscribe: <mailto:majordomo@FreeBSD.ORG?subject=subscribe%20freebsd-questions>
List-Unsubscribe: <mailto:majordomo@FreeBSD.ORG?subject=unsubscribe%20freebsd-questions>
X-Loop: FreeBSD.ORG


You can use the B::deparse module to get code output, but *after* Perl
has processed it.  This means that all comments & whitespace will be gone,
as well as certain optimized-away expressions.

--=20
Matthew Emmerton      || matt@gsicomp.on.ca
GSI Computer Services || http://www.gsicomp.on.ca

On Wed, 3 Oct 2001, Andre` Niel Cameron wrote:

> If a perl scrypt looks like this:
> #!/usr/bin/perl
> use Filter::decrypt2 ;
> =FF
> 3'S[Eb^CRJZU^@VgYBxw^L^_
>=20
> L^W
> pW\)!YV^^(X^YQEBe]
> ^A^F$U^Z'n^\^W^._^H^[^GYN^GO^?GCx`^E^F^A>
>=20
> How can I decrypt it so I can change the code?
>=20
> Regards,
> Andre` C.
> Technical Support
> =D4=BF=D4=AC
> -------------------------------------------------------------------------=
---
> -
> Visit our support manual at http://supportmanual.com/
>=20
>=20
> To Unsubscribe: send mail to majordomo@FreeBSD.org
> with "unsubscribe freebsd-questions" in the body of the message
>=20


To Unsubscribe: send mail to majordomo@FreeBSD.org
with "unsubscribe freebsd-questions" in the body of the message